PL-TR-94-2271 


USER’S  GUIDE  FOR  THE  TOPSIDE  IONOSPHERIC 
PLASMA  MONITOR  (SSIES,  SSIES-2  AND  SSIES-3) 

ON  THE  SPACECRAFT  OF  THE  DEFENSE 
METEOROLOGICAL  SATELLITE  PROGRAM  (DMSP) 
VOLUME  III:  PROGRAM  MAINTENANCE  MANUAL 


J.  Robert  Cornelius 
Andrew  J.  Mazzella,  Jr. 


RDP  Incorporated 
391  Totten  Pond  Road 
Waltham,  Massachusetts  02154 


11  October  1994 


Scientific  Report  No.  4 


Approved  for  public  release;  distribution  unlimited 


19950209  058 


PHILLIPS  LABORATORY 

Directorate  of  Geophysics 

AIR  FORCE  MATERIEL  COMMAND 

HANSCOM  AIR  FORCE  BASE,  MA  01731-3010 


"This  technical  report  has  been  reviewed  and  is  approved  for  publication" 


'’Zt-C 


EDWARD  C.  ROBINSON 


Contract  Manager 
Data  Analysis  Division 


This  report  has  been  reviewed  by  the  ESD  Public  Affairs  Office  (PA)  and  is 
releasable  to  the  National  Technical  Information  Service  (NTIS) . 


Qualified  requestors  may  obtain  additional  copies  from  the  Defense  Technical 
Information  Center.  All  others  should  apply  to  the  National  Technical 
Information  Service. 


If  your  address  has  changed,  or  if  you  wish  to  be  removed  from  the  mailing 
list,  or  if  the  addressee  is  no  longer  employed  by  your  organization,  please 
notify  PL/IM,  29  Randolph  Road,  Hanscom  AFB,  MA  01731-3010.  This  will 
assist  us  in  maintaining  a  current  mailing  list. 


Do  not  return  copies  of  this  report  unless  contractual  obligations  or 
notices  on  a  specific  document  requires  that  it  be  returned. 


REPORT  DOCUMENTATION  PAGE 


Form  Approved 
OMB  No.  0704-0188 


Public  reporting  burden  for  this  collection  of  information  if  estimated  to  average  1  hour  per  response,  including  the  time  for  reviewing  instructions,  searching  existing  data  sources,  gathering  and  " 
maintaining  the  data  needed,  and  completing  and  reviewing  the  collection  of  information.  Send  commenta  regarding  this  burden  estimate  or  any  other  aspect  of  this  collection  of  information,  including 
suggestions  for  reducing  this  burden,  to  Washington  Headquarters  Services,  Directorate  for  Information  Operations  and  Reports,  1215  Jefferson  Davis  Highway,  Suite  1204,  Arlington,  VA  22202-4302, 
and  to  the  Office  of  Management  and  Budget,  Paperwork  Reduction  Project  (0704-0188),  Washington,  DC  20503. 


1.  AGENCY  USE  ONLY  (Leave  blank) 


4.  TITLE  AND  SUBTITLE 


2.  REPORT  DATE 

11  October  1994 


3.  REPORT  TYPE  AND  DATES  COVERED 

Scientific  Report  No.  4 


User’s  Guide  for  the  Topside  Ionospheric  Plasma  Monitor  (SSIES,  SSIES-2 
and  SSIES-3)  on  the  Spacecraft  of  the  Defense  Meteorological  Satellite 
Program  (DMSP),  Volume  III:  Program  Maintenance  Manual 


6.  AUTHOR (S) 

J.  Robert  Cornelius 

Andrew  J.  Mazzella,  Jr.  _ 


7.  PERFORMING  ORGANIZATION  NAME(S)  AND  ADDRESS(ES) 

RDP  Incorporated 
391  Totten  Pond  Road 
Waltham,  Massachusetts  02154 


FUNDING  NUMBERS 

PE  35160F 

PR  7659  TA  05  WU  AC 
Contract:  F19628-89-C-0079 


8.  PERFORMING  ORGANIZATION 
REPORT  NUMBER 


RDP-TR-9402 


9.  SPONSORING/MONITORING  AGENCY  NAME(S)  AND  ADDRESS(ES) 

Phillips  Laboratory 
29  Randolph  Road 

Hanscom  Air  Force  Base,  Massachusetts  01731-3010 
Contract  Manager:  Edward  C.  Robinson/GPD 


11.  SUPPLEMENTARY  NOTES 

Supersedes  PD-NW-85-336R,  Volume  III,  June  1987, 
and  NWRA-87-R011,  Volume  III,  August  1987. 


12a.  DISTRIBUTION/AVAILABILITY  STATEMENT 


Approved  for  public  release;  distribution  unlimited 


13.  ABSTRACT  (Maximum  200  words) 


10.  SPONSORING/MONITORING 
AGENCY  REPORT  NUMBER 


PL-TR-94-2271 


Volume  I:  PL-TR-94-2187 
Volume  II:  PL-TR-94-2270 


The  objective  of  the  Program  Maintenance  Manual  for  the  DMSP  SSIES  flight  data  processing  software  is  to 
provide  AFSFC  programming  personnel  with  the  information  necessary  to  understand  and  maintain  the  various 
components  of  the  system.  This  software  has  been  specifically  developed  to  process  the  SSIES-2  and  SSIES-2A  data 
formats,  with  provisions  for  retroactive  adaptation  to  the  original  SSIES  format  and  future  adaptation  to  the  SSIES- 
3  format. 

This  Program  Maintenance  Manual  describes  the  three  programs  which  constitute  the  AFSFC  SSIES  processing 
system:  BNBA,  LDCON02  and  APGA.  The  BNBA  program  performs  data  format  conversions  for  the  various 
SSIES  telemetry  data  formats  to  generate  a  common  file  format  for  subsequent  processing  by  the  APGA  program. 
The  LDCON02  program  generates  the  reference  parameter  file  of  satellite  and  instrument  conversion  constants  and 
processing  options  for  use  by  the  APGA  program.  The  APGA  program  performs  quality  evaluations  and  analyses  of 
the  SSIES  telemetry  data  to  create  database  files  and  reports  of  quantities  which  characterize  the  ionosphere. 


14.  SUBJECT  TERMS 


Ionosphere,  Plasma  Analysis,  Particle  Detectors 


LT7C  fsT-.-, T-rrr-j  _ _ ^ 


15.  NUMBER  OF  PAGES 
308 


16.  PRICE  CODE 


17.  SECURITY  CLASSIFICATION  18.  SECURITY  CLASSIFICATION 
OF  REPORT  OF  THIS  PAGE 

Unclassified  Unclassified 


19.  SECURITY  CLASSIFICATION  20.  LIMITATION  OF  ABSTRACT 
OF  ABSTRACT 


Unclassified 


Unlimited 


Standard  Form  298  (Rev.  2-89) 

Prescribed  by  ANSI  Sid.  Z39-18  298-102 


NSN  7504-01-280-5500 


11 


Table  of  Contents 


*  SECTION  1.  GENERAL .  1 

1.1  Purpose  of  the  Program  Maintenance  Manual .  1 

1.2  Project  References .  1 

1.2.1  System  Nature .  1 

•  1.2.2  Project  Participants .  1 

1.2.3  Project  Documents  .  1 

1.3  Terms  and  Abbreviations .  3 

SECTION  2.  SYSTEM  DESCRIPTION .  5 

2.1  System  Application .  5 

2.2  Security .  5 

2.3  General  Description .  5 

2.4  Program  APGA  Description .  6 

2.4.1  APGA  Main  Routine .  13 

2.4. 1.1  Subroutine  TIMES .  14 

2.4. 1.2  BLOCK  DATA  Routine  DSSIES .  15 

2.4.2  Subroutine  INIT .  17 

2.4.2. 1  Subroutine  CD  ATE .  21 

2.4.2.2  Subroutine  VSWEEP .  21 

2.4.2.3  Subroutine  OPNPRP .  23 

2.4.2.4  Subroutine  VEHPAR .  24 

2.4.2.5  Subroutine  OPNEDR .  26 

2.4.2.6  Subroutine  OPNAPX .  27 

2.4.2.7  Subroutine  OPNXFR .  29 

2.4.2.8  Subroutine  OPNSTF .  30 

2.4.3  Subroutine  INPUT .  31 

2.4.3. 1  Subroutine  RDPREP .  34 

2.4.3.2  Subroutine  EPHEM .  35 

2.4.3.2.1  Subroutine  APXTAB .  39 

2.43.2.2  Subroutine  OFFSET .  40 

2.4.3.23  Subroutine  INTERP .  41 

2.4.33  Subroutine  CHEKIT .  42 

2.43.4  Subroutine  DECODE .  44 

2.43.4.1  Subroutine  DSMSTT .  47 

2.43.5  Subroutine  HSKPNG .  48 

2.4.4  Subroutine  PROCES .  49 

2.4.4. 1  Subroutine  SMPRC .  51 

2.4.4.1.1  Subroutine  RANGE .  54 

2.4.4. 1.2  Subroutine  SMCMD .  55 

2.4.4.13  Subroutine  ELAMP .  56 

2.4.4. 1.4  Function  FND511 .  60 

l  2.4.4. 1.5  Subroutine  FILTER .  61 

2.4.4.1.6  Subroutine  SMDIAG .  62 

2.4.4.2  Subroutine  EPPRC .  64 

2.4.4.2.1  Subroutine  SWPCOL . 67 

2.4.4.2.2  Subroutine  EPSWP .  68 

2.4.4.23  Subroutine  EPDIAG .  70 

2.4.4.2.4  Subroutine  NTRP .  72 

iii 


2AA.2.5  Subroutine  SELNRM. 
2AA.2.6  Subroutine  EPDC.  . . 
2AA.3  Subroutine  RPAPRC . 

2.4.4.3.1  Subroutine  RPAALG. 

14.4.3.2  Subroutine  CHKSWP. 

2.4.4.3.3  Subroutine  RPDIAG. 

2.4.4.3.4  Subroutine  MEANSD. 

2.4.4.3.5  Subroutine  XPOS.  .  . 

2.4.4.3.6  Subroutine  SSLOPE  . 

2.4.4.3.7  Subroutine  PLASMA. 

2.4.4.3.8  Subroutine  RPASWP 

2.4.4.3.9  Subroutine  COMPAR. 

2.4.4.3.10  Subroutine  ANLSAV. 

2.4.4.4  Subroutine  DMPRC . 

2.4.4.4.1  Subroutine  DMINFO. 

2.4.4. 4.2  Subroutine  DMCMD. 

2.4.4.4.3  Subroutine  DMSWCH. 

2.4.4.4.4  Function  DMVEL.  . . 

2.4.4.4.5  Function  DMDEN.  . . 

2.4.4.4.6  Subroutine  DMFIBA. 

2.4.4.4.7  Subroutine  HPMODE. 

2.4.4.4.8  Subroutine  DMDIAG. 

2.4.4.5  Subroutine  MPPRC . 

2.4.4.5.1  Subroutine  MPEP.  .  . . 

14.4.5.2  Subroutine  MPRPA.  .  . 
2.4.4.5.3  Subroutine  MPDIAG  . 

14.4.6  Subroutine  CKLPRC . 

2.4.4.6.1  Subroutine  CKLSAV.  . 

2.4.4.6.2  Subroutine  CKLPRP.  . 

2.4.4.6.3  Subroutine  DENFIX.  . 

2.4.4.6.4  Subroutine  DETRND. 

2.4.4.6.5  Subroutine  ENVMOD. 

2.4.4.6.6  Subroutine  BLDPDS.  . 

2.4.4.6.7  Subroutine  DENPDS.  . 

2.4.4.6.8  Subroutine  WINDOW. 

2.4.4.6.9  Subroutine  FFT. . 

2.4.4.6.10  Subroutine  BSMOO.  . 

2.4.4.6.11  Subroutine  FILPDS.  . 

2.4.4.6.12  Subroutine  TANDP.  . 

2.4.4.6.13  Subroutine  LSF . 

2.4.4.6.14  Subroutine  DVAVE.  . 

2.4.4.6.15  Function  CVEFF.  . . . 

2.4.4.6.16  Subroutine  CTRANS. 

2.4.4.6.17  Subroutine  MAGFLD. 

2.4.4.6.18  Subroutine  IGRF.  . .  . 

2.4.4.6.19  Subroutine  CMAT.  .  . 

2.4.4.6.20  Function  CK . 

2.4.4.6.21  Subroutine  CKDIAG. 

2.4.4.7  Subroutine  QCPRC . 

2.4.4.7.1  Subroutine  SCDIAG.  . 

2.4.4.7.2  Subroutine  LDSTF.  .  . 

2.4.4.7.3  Subroutine  QCRPA.  .  . 


73 

75 

76 
79 
81 
83 

85 

86 

87  * 

88 
90 

92 

93 

94 

98 

99 
101 
102 

103 

104 
106 
108 
110 
112 
114 
116 
118 
126 

127 

128 

129 

130 

132 

133 

134 

135 

136 

137 

138 

139 

140 

141 

142 

143 

144 

145  4 

146 
146 
149 

152  , 

154 

155 


IV 


2AA.1A  Subroutine  QCEP .  156 

2.4.5  Subroutine  OUTPUT .  158 

2.4.5. 1  Subroutine  WRTEDR .  160 

2.4.5.1.1  Subroutine  EDRPRT .  162 

2.4.5.2  Subroutine  WRTXFR .  164 

2.4.5.2.1  Subroutine  LDXFR .  166 

2.4.5.2.2  Subroutine  XFRPRT .  167 

2.4.5.3  Subroutine  SETEDR .  168 

2.4.5.4  Subroutine  LDEDR .  170 

2.4.5.4.1  Subroutine  LDSWPS .  174 

2.4.6  Subroutine  SUMOUT .  175 

2.4.6. 1  Subroutine  SFSUM . 177 

2.4.6.2  Subroutine  IESPRT .  177 

2.4.7  Subroutine  QUIT .  181 

2.4.8  General  Purpose  Library  Routines .  184 

2.4.8. 1  Subroutine  AD  ATE .  184 

2.4.8.2  Function  BITON .  185 

2.4.8.3  Subroutine  COPY .  185 

2.4.8.4  Function  ERF. .  186 

2.4.8.5  Subroutine  FILERR .  187 

2.4.8.6  Subroutine  FITLIN .  189 

2.4.8.7  Subroutine  LATLON .  190 

2.4.8.8  Subroutine  LOGLIN .  191 

2.4.8.9  Subroutine  OPNDOF .  192 

2.4.8.10  Function  PRMRNG .  193 

2.4.8.11  Subroutine  PRNTON .  195 

2.4.8.12  Subroutine  TIMCON .  196 

2.4.8.13  Subroutine  UPBITS .  197 

2.5  Program  LDCON02 .  197 

2.6  Program  BNBA  Description .  199 

2.6.1  Main  Routine .  199 

2.6.2  Subroutine  USERIN .  202 

2.6.3  Subroutine  RIREXT . 203 

2.6.4  Subroutine  EPHEXT .  205 

2.6.5  Subroutine  TMEXT.  . 206 

2.6.6  Subroutine  WORKOUT .  208 

2.6.7  Subroutine  WORKIN .  209 

2.6.8  Subroutine  GET_XCEPTS .  211 

2.6.8. 1  Subroutine  IES_XCEPT .  213 

2.6.8.1.1  Subroutine  VALCHEK .  215 

2.6.8.1.2  Subroutine  CYCNT1 . 216 

2.6.8. 1.3  Subroutine  CYCNT2 .  218 

2.6.8.2  Subroutine  IES2_XCEPT .  220 

2.6.8.3  Subroutine  IES2A_XCEPT .  220 

2.6.8.4  Subroutine  IES3_XCEPT .  220 

2.6.9  Subroutine  STOREM .  223 

2.6.10  Subroutine  OUTPUT .  225 

SECTION  3.  ENVIRONMENT .  227 

3.1  Equipment  Environment .  227 

3.2  Support  Software .  227 

3.3  Data  Base .  227 


v 


3.3.1  General  Characteristics .  227 

3.3.1. 1  Input  Data  Base .  227 

33.1.1.1  SSIES  Mission  Sensor  Raw  Data  File . 227 

3.3.1. 1.2  SSIES  Common  Format  Data  File .  228 

3.3.1.2  Output  Data  Base .  228 

3.3.1.2.1  Environmental  Data  Record  File .  228 

3.3.1.2.2  Statistical  Information  File .  228 

3.3.1.2.3  AGDB  Transfer  Files .  229 

3.3. 1.3  Control/Information  Data  Base .  229 

3.3.1.3.1  APGA  Program  Control  file .  229 

3.3. 1.3.2  Apex  Coordinate  Conversion  File .  230 

3.3.2  Organization  and  Detailed  Description .  230 

3.3.2.1  SSIES  Mission  Sensor  Raw  Data  File .  230 

3.3.2.2  File  IESPREPFILE .  230 

33.2.3  File  IESEDRFILE .  236 

33.2.4  File  IESSTATFILE .  237 

33.2.5  File  IESAGDBXFR1  (and  IESAGDBXFR2) .  237 

33.2.6  File  IESCNTRLFILE .  239 

33.2.7  File  IESAPEXTABLE .  239 

SECTION  4.  PROGRAM  MAINTENANCE  PROCEDURES .  243 

4.1  Conventions .  243 

4.1.1  COMMON  Block  Names .  243 

4.1.2  Variable  Names .  243 

4.1.3  Coordinate  Systems .  243 

4.13.1  Geocentric  Coordinate  Systems .  243 

4.13.2  Spacecraft-Centered  Coordinate  Systems .  245 

4.1.33  Time  Systems .  246 

4.1.4  Data  Flow  Control  Flags .  247 

4.2  Verification  Procedures .  248 

4.3  Error  Conditions .  248 

4.4  Special  Maintenance  Procedures .  248 

4.4.1  Program  Compilation  and  Collection .  248 

4.4.2  Modification  of  Parameters  in  IESCNTRLFILE .  249 

4.4.3  Limiting  Amount  of  Data  Processed .  249 

4.4.4  Program  APGA  Diagnostic  Output .  249 

4.4.5  Initializing  Fortran  77  Direct  Access  Files .  257 

4.5  Listings .  257 

APPENDIX  A:  Program  APGA  Structure  Charts .  259 

APPENDIX  B:  Description  of  Data  Analysis  Algorithms .  277 

B.l  Electron  Probe  (EP)  Processing  Algorithms .  278 

B.2  Retarding  Potential  Analyzer  (RPA)  Processing  Algorithms .  282 

B.3  Drift  Meter  Processing  Algorithms .  286 

B.4  Scintillation  Meter  Processing  Algorithms .  290 

B.5  QL  Calculation  Algorithm .  295 

B.6  Microprocessor  Sweep  Analyses  Processing .  299 


vi 


Figures 


1  DMSP  and  APGA  data  flow .  6 

2  APGA  program  internal  organization  and  data  flow .  7 

3  APGA  program  hierarchy  chart .  7 

4  APGA  program  control  and  data  flow  .  8 

5  APGA  program  COMMON  block/Subroutine  cross  reference .  9 

6  INIT  module  hierarchy  chart  .  18 

7  INPUT  module  hierarchy  chart  .  31 

8  SMPRC  module  hierarchy  chart .  51 

9  EPPRC  module  hierarchy  chart  .  64 

10  RPAPRC  module  hierarchy  chart .  77 

11  DMPRC  module  hierarchy  chart .  95 

12  Format  and  contents  of  the  DM  H+  mode  output  file .  107 

13  MPPRC  module  hierarchy  chart .  110 

14a  IESMPEPPRT  sample  output  listing .  119 

14b  IESMPRPAPRT  sample  output  listing .  120 

15  CKLPRC  module  hierarchy  chart .  122 

16  QCPRC  module  hierarchy  chart .  149 

17  OUTPUT  module  hierarchy  chart .  158 

18  Processing  statistics  summary  output  sample  -  single  readout  .  178 

19  Processing  statistics  summary  output  sample  -  periodic  summary .  179 

20  Console  error  messages  generated  from  Subroutine  QUIT  .  183 

21  Program  BNBA  hierarchy  chart  .  200 

22  Common  Format  data  frame  (part  1)  .  232 

22  Common  Format  data  frame  (part  2) .  233 

23a  Structure  and  contents  of  header  blocks  in  file  IESEDRFILE .  236 

23b  Structure  of  I/O  records  in  file  IESEDRFILE .  237 

24  Structure  and  contents  of  file  IESSTATFILE .  238 

25a  Structure  of  files  IESAGDBXFR1  (and  IESAGDBXFR2)  .  240 

25b  Structure  and  contents  of  data  records  from  files  IESAGDBXFR1  (and  IESAGDBXFR2)  241 

26  IESAPEXTABLE  structure  and  contents .  242 

27  Sample  run  diagnostic  outputs  .  250 

28  Processing  modules  sample  ASCII  diagnostic  outputs .  251 

28  Processing  modules  sample  ASCII  diagnostic  outputs  (continued) .  252 

29  Formats  of  binary  diagnostic  output  files  .  253 

29  Formats  of  binary  diagnostic  output  files  (continued) .  254 

29  Formats  of  binary  diagnostic  output  files  (continued) .  255 

30  Sample  EDR  ASCII  diagnostic  output .  256 

31  Sample  AGDB  transfer  record  ASCII  diagnostic  output .  258 

B1  SSIES  Electron  Sensor  modes .  279 

B2  Theoretical  instrument  response  to  a  2-ion  constituent  plasma .  283 

B3  Sample  irregularity  power  density  spectrum . . . . . . . .  .  . . . . 296 


VII 


Accesion  For 


NT1S  CRA&J 
DTIC  TAB 
Unannounced 
Justification 


□ 


By _ 

Distribution  / 


Availability  Codes 


Dist 


Avail  and/or 
Special 


Tables 


1  Contents  of  MP  sweep  analyses  comparison  output  files  (IESMPEPPRT  and  IESMPRPAPRT)  121 


2  Summary  print  output  description .  180 

3  IES  exceptions  list .  213 

4  IES2  exceptions  list .  221 

5  IES2A  exceptions  list  .  222 

6  IES3  exceptions  list .  223 

7  DMSP  ephemeris  block  data  used  by  program  APGA  .  231 

8  Common  Format  data  words  (Cycle  1) .  234 

8  Common  Format  data  words  (Cycle  2) .  235 

B1  SM  sensor  density  ranges  .  291 


viii 


i 


SECTION  1.  GENERAL 


1.1  Purpose  of  the  Program  Maintenance  Manual. 

The  objective  of  this  Program  Maintenance  Manual  for  the  programs  which  make  up  the  SSIES  Flight 
Data  Processing  (FDP)  system  is  to  provide  the  maintenance  programmer  with  the  information  necessary 
to  effectively  maintain  the  system. 

1.2  Project  References. 

1.2.1  System  Nature. 

The  SSIES  FDP  system  will  process  flight  data  from  the  DMSP  Mission  Sensors  for  Ions,  Electrons,  and 
Scintillation  (SSIES)  to  provide  geophysical  parameters  describing  the  earth’s  ionosphere.  This  system  will 
be  part  of  the  overall  AFSFC  DMSP  Mission  Sensor  system.  The  SSIES  FDP  system  consists  of  three 
programs: 

1.  Program  BNBA  reads,  unpacks,  and  checks  the  Ephemeris  and  raw  flight  data  from  IES,  IES2, 
IES2A,  or  IES3  satellite  configurations.  The  data  are  reformatted  into  the  standard  format  and 
written  to  the  IESPREPFILE  for  input  to  the  APGA  program. 

2.  Program  APGA  processes  the  standard  format  flight  data  to  convert  it  to  geophysical  parameters 
which  are  stored  in  Environmental  Data  Records  (EDRs)  in  an  EDR  file  (IESEDRFILE). 

Summary  records  of  the  EDRs  are  written  to  files  for  transfer  to  the  Astrogeophysical  Data  Base 
(AGDB). 

3.  Program  LDCON  allows  the  user  to  interface  with  the  file  which  contains  control  parameters  for 
program  APGA. 

1.2.2  Project  Participants. 

a.  Sponsor:  Air  Force  Space  and  Missile  Command  (USAF  Materiel  Command)  Space  Division, 

DMSP  Program  Office  (SMC/CIE) 

b.  Developer:  RDP  Incorporated,  based  upon  a  system  originally  developed  by  Northwest  Research 
Associates,  Inc.  (NWRA) 

c.  User:  Air  Force  Space  Forecast  Center  (AFSFC) 

d.  Operating  Center:  Air  Force  Space  Forecast  Center  (AFSFC) 

1.2.3  Project  Documents 

a.  (Project  Request)  USAF  Space  Division  Contract  No.  F04701-84-C-0038,  Task  17-09. 

b.  AFGL-TR-78-0071,  The  Topside  Ionosphere  Plasma  Monitor  (SSIEl  for  the  Block  5D/Flight  2 
DMSP  Satellite.  March  1978,  ADA058503. 

c.  AFGL-TR-80-0152,  In-Flight  Characteristics  of  the  Topside  Ionosphere  Monitor  fSSIE)  on  the 
DMSP  Satellite  Flight  2  and  Flight  4,  April  1980,  ADA088879. 
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d.  AFGL-TR-84-0103,  Drift  Scintillation  Meter.  March  1984,  ADA142523. 

e.  Analytyx  Report  A30803R,  SSIES  Plasma  Monitor  System  Main  Electronics  Package  -  R&D 
Equipment  Information  Report,  prepared  for  AEGL  contract  No.  F19628-80-C-0162,  August  1983. 

f.  Development  of  Software  for  the  Analysis  of  Plasma  Measurements  Using  the  Retarding  Potential 
Analyzer.  Unpublished,  undated  document  provided  by  AFGL/PHG,  June  1985.  (copy  in  SSIES 
Project  Workbook). 

g.  SSIES  Dieital  Flight  Data  Processing  Program  Functional  Description.  Unpublished  draft  document 
provided  by  AFGL/PHG,  July  1984  (copy  in  SSIES  Project  Workbook). 

h.  DOD  Standard  7935,  Automated  Data  Systems  Documentation,  15  February  1983. 

i.  Sperry  Fortran  (ASCII)  Level  10R1  Programmer  Reference. 

j.  AFGWC  Software  Standards,  1  July  1985. 

k.  AFGWC  Systems  Documentation,  Library  Software  (FLASH/AFLASH). 

l.  AFGWC  Systems  Documentation,  Data  Format  Handbook. 

m.  AFGWC/SDMS,  DMSP  Block  5D2  Special  Sensor  Data  Processing  System  Functional  Description. 
Revision  2,  10  December  1984. 

n.  AFGWC/SDMS,  DMSP  Block  5D2  Special  Sensor  Data  Processing  System  Data  Base  Specification. 
May  1985. 

o.  PD-NW-83-292R,  Definition  of  Procedures  for  Gridding  the  WBMOD  Ionosphere  Scintillation 
Model.  April  1983. 

p.  PD-NW-85-336R,  DMSP  SSIES  Flight  Data  Processor  System  Documentation. 

1.  Volume  I,  Functional  Description 

2.  Volume  II,  Users  Manual 

3.  Volume  IV,  Test  Plan 

4.  Volume  V,  Test  Analysis  Report. 

q.  PD-NW-82-273R,  WBMOD  Scintillation  Model  System  Documentation.  Volume  III,  Proeram 
Maintenance  Manual.  29  May  1985. 

r.  SSIES  Project  Workbook.  August  1986. 

s.  Livingston,  R.C.,  C.L.  Rino,  J.P.  McClure,  and  W.B.  Hanson,  "Spectral  Characteristics  of  Medium- 
scale  Equatorial  F  Region  Irregularities,"  J.  Geophys.  Res..  86,  2421,  April  1981  (copy  in  the  SSIES 
Project  Workbook). 

t.  G.  Knuge,  Calculation  of  Field  Lines  and  the  Shell  Parameter  L  from  Multipole  Expansions  of  the 
Geomagnetic  Field.  ESOC  International  Note  No.  66,  1970. 

u.  VanZandt,  T.E.,  W.L.  Clark,  and  J.M.  Warwick,  "Magnetic  Apex  Coordinates:  A  Magnetic 
Coordinate  System  for  the  Ionospheric  F2  Layer,"  J.  Geophys.  Res..  77,  2406,  May  1972. 
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v.  Rino,  C.L.,  "A  Power  Law  Phase  Screen  Model  for  Ionospheric  Scintillation,  1.  Weak  Scatter," 

Radio  Sci..  6,  1135,  November  1979. 

w.  Bergland,  G.D.  and  M.T.  Dolan,  "Fast  Fourier  Transform  Algorithm,"  in  Programs  for  Digital  Signal 
Processing,  IEEE  Press,  IEEE  ISBN  0-87942-128-2,  1979. 


1.3  Terms  and  Abbreviations. 


AFGL 

PHG 

AFGWC 

DO 

DOX 

SD 

SDDE 

SDMD 

SDMS 

WS 

WSE 

AFSFC 

AGDB 

Apex  Coordinates 
AWS 

Q 

CkL 

Data  Frame 

DM 

DMSP 

EDR 

EDR  File 

EP 

FDP 

Fortran  77 

F8 

HSP 

Modified  Apex  Coordinates  - 

MP 

Ne 

Nj 

N[H+] 

N[He+] 

N[0+] 

NWRA 

Pi 

PSD 

PREP  File 

REV 

RMSj 

RPA 

SDF 


Air  Force  Geophysics  Laboratory  (former  name  of  PL/GP) 

Space  Physics  Division  (former  name  of  PL/GPSG) 

Air  Force  Global  Weather  Central 
Operations  Division 
Plans  Branch 

Software  Development  Division 

Space  and  Electromagnetic  Systems  Section 

Database  Section 

Satellite  Processing  Section 

Special  Support  Division 

Space  Environment  Support  Branch 

Air  Force  Space  Forecast  Center 

Astrogeophysical  Data  Base 

(See  modified  Apex  coordinates) 

Air  Weather  Service 

Irregularity  strength  parameter 

Height-integrated  irregularity  strength  parameter 

A  1  second  telemetry  data  record  from  the  DMSP  data  stream 

SSIES  ion  Drift  Meter  sensor 

Defense  Meteorological  Satellite  Program 

Environmental  Data  Record 

File  IESEDRFILE 

SSIES  Electron  Probe 

Flight  Data  Processing 

ANSI  Standard  X3.9-1978  Fortran 

DMSP  Flight  8,  Block  5D/2 

Hours  Summary  Print  output 

Geomagnetic  latitude,  longitude,  and  local  time  coordinate  system  (see 
reference  1.2.3o) 

SSIES  on-board  microprocessor 
Electron  density  (el/cm3) 

Total  ion  density  (ion/cm3) 

Density  of  H+  ions  (ion/cm3) 

Density  of  He+  ions  (ion/cm3) 

Density  of  0  +  ions  (ion/cm3) 

Northwest  Research  Associates,  Inc. 

Slope  of  the  irregularity  power  spectrum  (one  dimensional) 

Power  spectral  density  ((el/cm3)2/Hz) 

Mission  sensor  preprocessed  data  file  containing  data  frames  and  satellite 
ephemeris  data  (IESPREPFILE) 

One  readout  of  DMSP  flight  data  (nominally  101  minutes) 

Output  from  jlh  filter  (1-9)  of  the  SM  sensor 
SSIES  ion  Retarding  Potential  Analyzer 
Spectral  Density  Function 
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SENPOT 

SM 

SMC 

CIE 

SSIE 

SSIES 

SSIES2 

SSIES2A 

SSIES3 

Te 

T, 

T, 

TEC 

Transfer  File 


u„ 

“r 

4>an(0 


SSIES  Potential  Sensor 
SSIES  ion  Scintillation  Meter 

Air  Force  Space  and  Missile  Command  (USAF  Materiel  Command) 

DMSP  Program  Office,  Engineering  Division 

Mission  Sensor  for  Ions  and  Electrons  (DMSP  F2  -  F7) 

DMSP  Mission  Sensor  for  Ions,  Electrons,  and  scintillation  (DMSP 
spacecraft  F8  -  F10) 

DMSP  Mission  Sensor  for  Ions,  Electrons,  and  Scintillation  (DMSP 
spacecraft  Fll  -  FI  5) 

SSIES2  with  uplinked  program  to  output  80  telemetry  data  words  instead 
of  84 

DMSP  Mission  Sensor  for  Ions,  Electrons,  and  Scintillation  (DMSP 
spacecraft  F16  -  F20) 

Electron  temperature  (°K) 

Ion  temperature  (°K) 

Irregularity  power  spectral  density  at  a  fluctuating  frequency  of  1  Hz 
Total  Electron  Content 

One  of  two  files  used  to  transfer  processed  SSIES  data  for  storage  into 
the  AGDB  (files  IESAGDBXFR1  and  IESAGDBXFR2) 

Ion  drift  velocity,  horizontal  cross-track  component  (m/s) 

Ion  drift  velocity,  horizontal  along-track  (ram)  component  (m/s) 

Ion  drift  velocity,  vertical  cross-track  component  (m/s) 

Spacecraft  potential  (volts) 

Plasma  irregularity  spectral  density  function 


Note:  The  tacit  assumption  that  the  ionospheric  plasma  is  neutral,  i.e.  Ne=Nf,  is  made  throughout  this 
document. 
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SECTION  2.  SYSTEM  DESCRIPTION 


2.1  System  Application. 

The  primary  objective  of  the  SSIES  data  frame  processor,  program  APGA,  is  to  convert  the  engineering 
parameters  such  as  currents  and  voltages  contained  in  the  raw  data  into  geophysical  parameters  which 
specify  the  state  of  the  earth’s  ionosphere  as  observed  at  the  location  of  the  DMSP  spacecraft. 

Specifically,  the  following  in  situ  parameters  will  be  calculated: 

a.  Electron  density,  Ne. 

b.  Total  ion  density,  N(. 

c.  Heavy  ion  density,  N[0+]. 

d.  Light  ion  density,  N[H+]  or  N[He+j. 

e.  Electron  temperature,  Te. 

f.  Ion  temperature,  Tj. 

g.  Ion  drift  velocity,  ur,  uv,  and  uh. 

h.  Irregularity  spectrum  parameters  4>an(0.  Ti»  pi,  ar,d 

The  APGA,  BNBA,  and  LDCON02  programs  are  written  in  ANSI  Standard  X3.9-1978  Fortran,  known  as 
Fortran  77.  All  of  the  programs  have  been  written  specifically  for,  or  adapted  to,  operation  on  a  Digital 
Equipment  Corporation  VAX  computer  system.  The  LDCON02  program  uses  no  VAX-specific  logic  or 
routines  (although  filenames  are  specific  to  the  VAX  implementation),  and  could  be  migrated  to  another 
system  with  a  minimum  of  modifications.  The  APGA  program  utilizes  a  small  number  of  system  routines 
for  date  and  time  operations.  The  BNBA  program,  which  performs  unpacking  and  bit  manipulation 
operations  specific  to  the  VAX  internal  data  storage  configuration,  will  not  migrate  to  another  system 
without  extensive  modifications. 

2.2  Security. 

The  APGA,  BNBA,  and  LDCON02  programs  are  unclassified. 

2.3  General  Description. 

The  APGA  program  is  executed  as  part  of  the  system  which  processes  data  from  the  DMSP  mission 
sensors.  Figure  1  illustrates  the  data  flow  through  the  DMSP  SSIES  processing  system.  Figure  2  shows 
the  files  used  by  the  APGA  program. 

The  APGA  program  will  process  either  all  data  available  from  the  SSIES  sensors  or  user  selected  subsets. 
When  the  program  runs,  it  will  process  reformatted  DMSP  SSIES  flight  data  stored  in  file  IESPREPFILE. 
A  subset  of  the  data  in  the  EDRs  will  be  stored  in  one  of  two  files  (IESAGDBXFR1  or  IESAGDBXFR2). 
This  was  formerly  for  transfer  to  the  AGDB  at  AFGWC,  but  this  operation  is  not  implemented  at  SFC. 
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IES  READOUT  REV 


DELETE  ENTR 


UMF 


SATELLITE 

DATABASE 


AFSFC  DMSP  IES  DATA  PROCESSING 


[  IES2_SFC.PCX _ 

Figure  1  DMSP  and  APGA  data  flow 
2.4  Program  APGA  Description. 

Figure  3  shows  the  overall  layout  of  the  APGA  program  in  hierarchy  form,  and  Figure  4  illustrates  the 
flow  of  control  and  data  through  the  program.  Appendix  A  contains  structure  charts  for  the  APGA 
program  showing  the  subroutine  interfaces  in  more  detail.  Figure  5  is  a  COMMON 
BLOCK/SUBROUTINE  cross-reference  chart  for  the  APGA  program.  Appendix  B  contains  descriptions 
of  the  processing  algorithms  for  the  various  sensors  and  data  types  which  are  implemented  in  the  APGA 
program. 


Figure  2  APGA  program  internal  organization  and  data  flow 


APGA: 

Top-level  program,  calling  other  main  modules 

.  IN  IT: 

initialize  reference  variables  and  data  files 

.  INPUT: 

acquire  and  distribute  SSIES-2  data 

.  PROCES: 

control  processing  of  one  data  frame 

.  .  SMPRC: 

process  scintillation  meter  (SM)  data 

.  .  EPPRC: 

process  electron  probe  (EP)  data 

.  .  RPAPRC: 

process  retarding  potential  analyzer  (RPA)  data 

.  .  DMPRC: 

process  driftmeter  (DM)  data 

.  .  MPPRC: 

process  microprocessor  (MP)  data 

.  .  CKLPRC: 

perform  calculations  for  CKL  analysis 

.  .  QCPRC: 

perform  and  report  comparisons  of  processor  results 

.  OUTPUT: 

generate  IESEDRFILE  and  IESAGDBXFR  records 

.  SUMOUT: 

generate  summaries  at  end  of  processing 

.  QUIT: 

prepare  printing  status  and  data  file  transfer 

»  Figure  3  APGA  program  hierarchy  chart 


7 


IESPROLIMITS  1 1 1 ESCNTRL FILE  1 1 IESAPEXTABLE  1 1 IESPREPFILE  1 1 IESEDRFILE  IESSTATFILE  1 1 IESAGDBXFR1 


Figure  4  APGA  program  control  and  data  flow 
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Figure  5  APGA  program  COMMON  block/Subroutine  cross  reference 


Figure  5  APGA  program  COMMON  block/ Subroutine  cross  reference  (continued) 
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Figure  5  APGA  program  COMMON  block/Subroutine  cross  reference  (continued) 
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Figure  5  APGA  program  COMMON  block/Subroutine  cross  reference  (continued) 
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2.4.1  APGA  Main  Routine. 


a.  Function. 

The  main  routine  controls  processing  of  the  DMSP  SSIES  data. 

b.  Inputs. 

There  are  no  inputs  to  the  main  routine.  Other  routines  perform  all  initialization  and  input/output. 

A  logical  end  of  data  status  flag  (variable  THEEND)  indicating  that  all  data  have  been  processed  is 
returned  to  this  routine  by  Subroutine  INPUT.  See  the  associated  subroutines  for  further  details. 

c.  Processing. 

1.  Obtain  the  system  wall  and  CPU  times  and  print  them  out  (Subroutine  TIMES). 

2.  Initialize  the  program  (Subroutine  INIT). 

3.  Fetch  and  process  one  second  of  raw  SSIES  data  until  all  data  in  the  PREP  file  have  been 
processed  as  follows: 

(a)  Fetch  a  one  second  data  frame  (Subroutine  INPUT).  If  the  end  of  data  status  flag  (THEEND) 
is  .TRUE,  and  no  data  have  been  previously  processed,  jump  to  step  4. 

(b)  Process  the  data  frame,  converting  the  raw  data  into  geophysical  parameters  (Subroutine 
PROCESS). 

(c)  Build  and  output  Environmental  Data  Records  (EDRs)  to  the  EDR  file  and  summary  records 
into  a  temporary  file  for  transfer  the  AGDB  (Subroutine  OUTPUT). 

(d)  Loop  back  to  step  3(a). 

4.  Create  any  Hours  Summary  Print  (HSP)  output  required  (Subroutine  SUMOUT). 

5.  Conduct  program  termination  activities,  which  include  closing  all  files  used  by  the  program, 
alerting  the  system  operator  of  any  abnormal  conditions  encountered  in  the  processing  which 
require  correction,  and  setting  the  appropriate  status  values  to  control  execution  of  the 
PRINTAWAY  processor  (not  implemented  at  SFC)  and  to  designate  which  of  the  two  AGDB 
transfer  files  needs  to  be  transferred  to  the  AGDB  (not  implemented  at  SFC). 

6.  Obtain  the  system  wall  and  CPU  times  and  print  them  out  (Subroutine  TIMES). 

7.  STOP. 

d.  Outputs. 

The  main  routine  directly  produces  only  one  output,  the  system  wall  and  CPU  times  at  the  start 
and  end  of  the  program  run  and  the  total  number  of  frames  of  data  processed  which  are  entered 
into  the  HSP.  See  the  associated  subroutines  for  further  details. 
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e.  Associated  subroutines. 


(See  Figure  3  for  a  hierarchy  chart.) 

1.  Subroutine  TIMES.  Fetch  the  system  wall  and  CPU  time  and  write  them  to  the  HSP  (see  2. 4.1.1) 

2.  Subroutine  INIT.  Perform  all  program  initialization  procedures  (see  2.4.2). 

3.  Subroutine  INPUT.  Interface  with  the  SFC  IESPREPFILE  to  fetch  and  decode  reformatted 
SSIES  data  frames  and  satellite  ephemeris  records  (see  2.4.3). 

4.  Subroutine  PROCESS.  Process  the  data  frames  to  convert  the  raw  sensor  data  into  geophysical 
parameters  (see  2.4.4). 

5.  Subroutine  OUTPUT.  Build  and  store  EDRs  and  AGDB  summary  records  (see  2.4.5). 

6.  Subroutine  SUMOUT.  Create  all  required  summary  HSP  output  (see  2.4.6). 

7.  Subroutine  QUIT.  Perform  all  end  of  processing  clean  up  procedures  (see  2.4.7). 

f.  Interfaces. 

1.  Uses  no  COMMON  blocks. 

2.4. 1.1  Subroutine  TIMES. 

a.  Function. 

Fetch  the  current  system  wall  and  CPU  times  and  print  them  out. 

b.  Inputs. 

1.  Argument  list. 

LABEL  -  CHARACTER  message  to  print  out  with  times 

LUALT  -  Logical  unit  of  alternate  print  file 

c.  Processing. 

1.  Fetch  the  current  system  wall  time  (Subroutine  ADATE). 

2.  Fetch  the  current  system  CPU  time  (VAX  library  routine  LIB$STAT_TIMER). 

3.  Print  out  the  current  system  wall  and  CPU  time  with  the  message  input  via  the  argument  list. 

4.  If  an  alternate  print  file  has  been  requested,  i.e.  LUALT  is  non-zero,  print  the  same  message  into 
the  file  designated  by  LUALT. 

5.  Return  to  the  main  routine. 
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d. 


Outputs. 


The  current  system  wall  and  CPU  time  and  input  message  are  output  to  HSP  in  the  following 
format: 

**WALL:  HH:MM:SS  CPU:  xxxx.xxx  Message  in  argument  list 

e.  Associated  subroutines. 

None. 

f.  Interfaces. 

1.  Called  from  the  main  routine. 

2.  Uses  no  COMMON  blocks. 

2.4.1.2  BLOCK  DATA  Routine  DSSIES. 

a.  Function. 

Initialize  COMMON  blocks  CONSTS,  EDRNGS,  IONUM,  LUDIAG,  and  RGSTAT. 

b.  Inputs. 

None. 

c.  Processing. 

None. 

d.  Outputs. 


COMMON  blocks. 

/CONSTS/ 

E 

Charge  on  an  electron  (coulombs) 

K 

Boltzmann’s  constant 

MP 

Proton  rest  mass  (kg) 

ME 

Electron  rest  mass  (kg) 

/EDRNGS/ 

DENMIN  - 

Minimum  allowed  value,  density  (cm'3) 

DENMAX  - 

Maximum  allowed  value,  density  (cm'3) 

IDEN 

Out-of-range  replacement  flag  (0  or  1) 

TEMIN 

Minimum  allowed  value,  Tc  (°K) 

TEMAX  - 

Maximum  allowed  value,  Tc  (°K) 

ITE 

Out-of-range  replacement  flag  (0  or  1) 

TIMIN 

Minimum  allowed  value,  Tj  (°K) 
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TIMAX 

ITI 

UHMIN  - 
UHMAX  - 
IUH 

UVMIN  - 

UVMAX  - 

IUV 

P1MIN 

P1MAX 

IP1 

T1MIN 
TIMAX  - 
ITI 

CKLMIN  - 
CKLMAX  - 
ICKL 

VLTMIN  - 
VLTMAX  - 
IVLT 

/IONUM/ 

LUOUT  - 

LUIN 

LUCF 

LUAPEX  - 
LUEDR  - 
LUXFR 
LUSTAT  - 

/LUDIAG/ 

LUSMA  - 
LUSMB  - 
LUMPEP  - 
LUMPRP  - 
LUEPA 
LUEPB 
LURPAA  - 
LURPAB  - 
LUDMA  - 
LUDMB  - 
LUDMHP  - 
LUCKLA  - 
LUCKLB  - 
LUQCA  - 
LUEDRA  - 
LUXFRA  - 


Maximum  allowed  value,  T;  (°K) 

Out-of-range  replacement  flag  (0  or  1) 

Minimum  allowed  absolute  value,  uh  or  ur  (m/s) 
Maximum  allowed  absolute  value,  uh  or  ur  (m/s) 
Out-of-range  replacement  flag  (0  or  1) 
Minimum  allowed  absolute  value,  t^  (m/s) 
Maximum  allowed  absolute  value,  it,  (m/s) 
Out-of-range  replacement  flag  (0  or  1) 
Minimum  allowed  value,  pj 
Maximum  allowed  value,  pj 
Out-of-range  replacement  flag  (0  or  1) 

Minimum  allowed  value,  T, 

Maximum  allowed  value,  T, 

Out-of-range  replacement  flag  (0  or  1) 

Minimum  allowed  value,  CkL 
Maximum  allowed  value,  CkL 
Out-of-range  replacement  flag  (0  or  1) 

Minimum  allowed  value,  V„  (volts) 

Maximum  allowed  value,  Vsc  (volts) 

Out-of-range  replacement  flag 


Logical  unit  for  standard  output  print  file 
Logical  unit  for  standard  input  file 
Logical  unit  for  file  IESCNTRLFILE 
Logical  unit  for  file  IESAPEXTABLE 
Logical  unit  for  file  IESEDRFILE 
Logical  unit  for  file  IESAGDBXFRn 
Logical  unit  for  file  IESSTATFILE 


Logical  unit  for  SMPRC  ASCII  diagnostic  output 
Logical  unit  for  SMPRC  binary  diagnostic  output 
Logical  unit  for  file  IESMPEPPRT 
Logical  unit  for  file  IESMPRPAPRT 
Logical  unit  for  EPPRC  ASCII  diagnostic  output 
Logical  unit  for  EPPRC  binary  diagnostic  output 
Logical  unit  for  RPAPRC  ASCII  diagnostic  output 
Logical  unit  for  RPAPRC  binary  diagnostic  output 
Logical  unit  for  DMPRC  ASCII  diagnostic  output 
Logical  unit  for  DMPRC  binary  diagnostic  output 
Logical  unit  for  DM  H+  mode  diagnostic  output 
Logical  unit  for  CKLPRC  ASCII  diagnostic  output 
Logical  unit  for  CKLPRC  binary  diagnostic  output 
Logical  unit  for  QCPRC  ASCII  diagnostic  output 
Logical  unit  for  WRTEDR  ASCII  diagnostic  output 
Logical  unit  for  WRTXFR  ASCII  diagnostic  output 
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/RGSTAT/ 

IDMSTA  - 

Driftmeter  mode  status 

IWGSTA  - 

Wiggle  level  status 

IRPSTA  - 

Repeller  level  status 

IVBSTA  - 

VBias/SENPOT  status 

IW1STA  - 

WIBAN1  Range  status 

IW2STA  - 

WIBAN2  Range  status 

IRFSTA  - 

SENPOT  relay  flag  status 

ISTSTA 

Subcom  processing  status 

Associated  subroutines. 

None. 


f.  Interfaces. 

1.  Uses  COMMON  blocks  CONSTS,  EDRNGS,  IONUM,  LUD1AG,  and  RGSTAT. 


2.4.2  Subroutine  INIT. 

a.  Function. 

Open  and,  when  necessary,  initialize  all  non-diagnostic  files  used  by  the  program,  and  initialize 
variables  in  COMMON  blocks  PIDEG,  PROCON,  PTIMES,  SATPAR  (from  file 
IESCNTRLFILE),  and  SCNMOD  (also  from  file  IESCNTRLFILE) .  Figure  6  is  a  hierarchy  chart 
for  this  module. 

b.  Inputs. 

1.  Files. 

(a)  IESCNTRLFILE.  All  parameters  in  COMMON  blocks  SATPAR  and  SCNMOD. 

(b)  IESPROLIMITS.  This  test  file  is  used  to  input  constraints  on  the  amount  of  raw  data  to  be 
processed.  If  this  file  is  not  found,  or  is  empty,  there  will  be  no  limits  placed  on  the 
processing.  The  inputs  from  this  file  are  the  day  of  year  (JDAY1)  and  time  of  day  (IPTIM1) 
(seconds  since  midnight,  GMT)  to  start  processing  data  and  the  number  of  seconds  to  process 
(NSECSP).  These  parameters  are  passed  to  the  input  routines  via  COMMON  PTIMES. 

**NOTE:  THIS  OPTION  IS  FOR  TEST  PURPOSES  ONLY  -  FILE  IESPROLIMITS 
SHOULD  NOT  BE  ASSIGNED  AS  PART  OF  THE  PRODUCTION  APGA 
RUNSTREAM.** 

c.  Processing. 

1.  Calculate  the  trigonometric  constants  in  COMMON  PIDEG. 

(Note:  These  are  all  based  on  the  calculation  of  n/2  from  the  arctangent  of  1.) 

2.  Initialize  the  processor  error  flag  (ICNERR),  console  message  disable  flag  (ICNWRT),  transfer 
file  flag  (NFXFR),  and  current  system  wall  time  variables  (IRDATE,  IRTIME,  and  IRMIN)  in 
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I  N  IT: 

.  CDATE: 

.  .  ADATE: 

.  .  TIMCON: 

.  VS  WEEP: 

.  OPNPRP: 

.  .  FILERR: 

.  VEHPAR: 

.  .  COPY: 

.  OPNEDR: 

.  .  PRNTON: 

.  .  FILERR: 

.  OPNAPX: 

. .  FILERR: 

.  OPNXFR: 

.  .  PRNTON: 

.  .  FILERR: 

.  OPNSTF: 

.  .  PRNTON: 

.  .  FILERR: 

.  FILERR: 

Figure  6  INIT  module  hierarchy  chart 
COMMON  PROCON. 

Note:  The  flag  ICNWRT  is  also  input  from  file  IESCNTRLFILE.  It  is  set  to  zero,  which 

enables  the  console  message  option,  in  case  an  error  is  encountered  in  reading  the  control 
parameters  from  IESCNTRLFILE. 

3.  Input  processing  control  parameters  from  test  file  IESPROLIMITS.  If  no  file  or  inputs  are  found, 
JDAY1  is  set  to  -1  to  disable  this  option. 

Note:  In  normal  production  mode,  JDAY1  should  always  be  -1 

4.  Read  in  the  program  control  parameters  from  file  IESCNTRLFILE  and  load  COMMON  blocks 
SATPAR  and  SCNMOD. 

5.  Open/initialize  all  system  files  as  follows: 

(a)  File  IESPREPFILE  which  contains  the  raw  SSIES  data  frames  (Subroutine  OPNPRP). 

(b)  File  IESEDRFILE  to  which  EDRs  are  written  (Subroutine  OPNEDR). 

(c)  File  IESAPEXTABLE  which  contains  the  information  for  calculating  geomagnetic  Apex 
coordinates  (Subroutine  OPNAPX). 

(d)  File  IESAGDBXFR1  or  IESAGDBXFR2  to  which  EDR  summary  records  will  be  written  for 
later  transfer  to  AGDB  (not  implemented  at  SFC)  (Subroutine  OPNXFR). 

(e)  File  IESSTATFILE  to  which  REV-averaged  processing  statistics  are  written  (Subroutine 


initialize  reference  variables  and  data  files 

reformat  date  and  time  for  program  use 

date  and  time  report  from  system 

convert  between  UT  and  IES  reference  minutes 

initialize  reference  EP  and  RPA  sweep  voltages 

open  IESPREPFILE  and  read  RIR  record 

determine  and  report  file  error  status 

acquire  processing  parameter  values  for  current  satellite 

initialize  array  or  transfer  values  between  arrays 

initialize  IESEDRFILE 

set  PRINTAWAY  status  for  conclusion  of  processing 

determine  and  report  file  error  status 

acquire  APEX  conversion  table  from  IESAPEXTABLE 

determine  and  report  file  error  status 

initialize  IESAGDBXFR1  or  IESAGDBXFR2 

set  PRINTAWAY  status  for  conclusion  of  processing 

determine  and  report  file  error  status 

initialize  IESSTATFILE 

set  PRINTAWAY  status  for  conclusion  of  processing 
determine  and  report  file  error  status 
determine  and  report  file  error  status 
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OPNSTF). 


6.  If  any  errors  are  encountered,  an  error  message  is  added  to  the  HSP,  the  PRINTAWAY  disable 
flag  is  set,  the  console  error  message  flag  is  set  (all  in  Subroutine  FILERR),  and  the  return  status 
flag  is  set  to  -1,  indicating  an  error  condition  was  encountered.  If  no  errors  were  encountered, 
this  flag  is  set  to  0. 


7. 

Return  to  the  main  routine. 

Outputs. 

1. 

Argument  list. 

ISTAT 

Return  status 

2. 

COMMON  blocks. 

/PIDEG/ 

PI 

Value  of  it 

TWOPI 

Value  of  2n 

PIBY2 

Value  of  tc/2 

RAD 

Conversion  factor,  degrees  to  radians 

DEG 

Conversion  factor,  radians  to  degrees 

RADHR  - 

Conversion  factor,  hours  to  radians 

HOUR 

Conversion  factor,  radians  to  hours 

/PROCON/ 

IPAWAY  - 

PRINTAWAY  disable  nag 

INTSUM  - 

IESSTATFILE  summary  print  interval  (hours) 

ISSDGP 

Processing  control  diagnostic  print  flag 

ICNWRT  - 

Console  message  disable  flag 

ICNERR  - 

Console  message  error  flag 

NFXFR 

Transfer  file  number  (always  1) 

IRDATE  - 

Date  of  current  run  (YYMMDD,  GMT) 

IRTIME  - 

Time  of  current  run  (HHMMSS,  GMT) 

IRMIN 

Time  of  current  run  (IES  minutes) 

/PTIMES/ 

JDAY1 

Julian  day  to  start  processing  (test  only) 

IPTIM1 

Time  to  start  processing  (test  only) 

NSECP 

Number  of  seconds  of  data  to  process  (test  only) 

/SATPAR/ 

NUMSAT  - 

Number  of  active  satellites  in  CNTRLFILE 

MISSN 

Active  DMSP  satellite  Mission  IDs 

IDFLT 

Active  DMSP  satellite  Flight  IDs 
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INFVEH 


Processing  control  parameters  from  CNTRLFILE 


/SCNMOD/ 

AE 

Equatorial  model  value  for  a 

AA 

Auroral  model  value  for  a 

BH 

Auroral  model  value  for  b 

GMLA 

Equatorial  region  boundary  (deg) 

GMLAW  - 

Equatorial  region  transition  width  (deg) 

GML1 

Auroral  boundary  model  lead  term  (deg) 

CK 

Variation  of  auroral  boundary  with  K,, 

CBT 

Variation  of  auroral  boundary  with  time 

DBT 

Phase  of  auroral  boundary  time  variation  (hours) 

CHB 

Auroral  region  transition  width  parameter 

DELTAO  - 

Model  value  for  angle  between  magnetic  L-shell  and  irregularity  sheets 

LE 

Equatorial  model  value  for  L 

LM 

Mid-latitude  model  value  for  L 

LA 

Auroral  model  value  for  L 

Q 

Model  value  for  q 

e.  Associated  subroutines. 

(See  Figure  6  for  a  hierarchy  chart). 

1.  Subroutine  CDATE.  Obtain  the  current  system  wall  time  (see  2.4.2.1). 

2.  Subroutine  VSWEEP.  Calculate  and  store  sweep  voltages  for  all  EP  and  RPA  sweep  types 
(see  2.4.2.2). 

3.  Subroutine  OPNPRP.  Prepare  file  IESPREPFILE  for  processing  (see  2.4.2.3). 

4.  Subroutine  VEHPAR.  Load  proper  processor  control  information  for  the  proper  DMSP 
vehicle  (see  2.4.2.4). 

5.  Subroutine  OPNEDR.  Prepare  file  1ESEDRFILE  for  processing  (see  2.4.2.5). 

6.  Subroutine  OPNAPX.  Input  the  parameters  and  tables  used  to  calculate  geomagnetic  Apex 
coordinates  from  file  IESAPEXTABLE  (see  2.4.2.6). 

7.  Subroutine  OPNXFR.  Determine  which  transfer  file  should  be  used  (IESAGDBXFR1  or 
IESAGDBXFR2)  and  prepare  it  for  processing  (see  2. 4.2.7). 

8.  Subroutine  OPNSTF.  Prepare  file  IESSTATFILE  for  processing  (see  2.4.2.8). 

9.  Subroutine  FILERR.  File  error  diagnostic  control  routine  (see  2.4.8.5). 

f.  Interfaces. 

1.  Called  from  the  main  routine. 

2.  Uses  COMMON  blocks  IONUM,  PIDEG,  PROCON,  PTIMES,  SATPAR,  and  SCNMOD. 
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2.4.2. 1  Subroutine  CD  ATE. 


a.  Function. 

Obtain  the  current  system  wall  time,  reformat  it,  and  calculate  the  IES  minute  corresponding  to 
that  time. 


b.  Inputs. 

None. 

c.  Processing. 

1.  Obtain  the  system  wall  time  (Subroutine  ADATE). 

2.  Reformat  the  date  from  MMDDYY  in  CHARACTER’S  format  to  YYMMDD  in  INTEGER,  and 
the  time  from  HHMMSS  in  CHARACTER’8  to  HHMMSS  in  INTEGER. 

3.  Calculate  the  IES  minute  corresponding  to  the  current  wall  time  (Subroutine  TIMCON).  (Note: 
The  IES  minute  is  the  primary  database  time  used  by  this  program.  It  is  (somewhat  arbitrarily) 
defined  as  the  number  of  minutes  elapsed  since  0000  GMT  on  1  January  1985.  See  section 
2.4.8.12  on  Subroutine  TIMCON  for  more  details.) 

4.  Return  to  Subroutine  INIT. 


d.  Outputs. 

1.  Argument  list. 


ICDATE 

ICTIME 

ICMIN 


Current  date  (YYMMDD,  integer) 
Current  time  (HHMMSS,  integer) 
Current  IES  minute  (integer) 


e.  Associated  subroutines. 


1.  Subroutine  TIMCON.  Calculate  the  IES  minute  for  the  current  date/time  (see  2.4.8.12). 


f.  Interfaces. 


1.  Called  from  Subroutine  INIT. 


2.  Uses  no  COMMON  blocks. 


2.4.2.2  Subroutine  VSWEEP. 
a.  Function. 

Calculate  the  ’ideal’  sweep  voltages  for  all  types  of  EP  and  RPA  sweeps.  This  is  necessary 
because,  beginning  with  the  SSIES-2  configuration  (satellite  F-ll),  the  EP  and  RPA  sweep 
voltages  are  not  included  in  the  downlinked  telemetry  data. 
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b.  Inputs. 

1.  Argument  list. 

ISSDGP  -  Diagnostic  print  control  switch 

c.  Processing. 

1.  Establish  the  seconds  counter  loop  (K  =  1  to  4). 

2.  Calculate  the  seconds-dependent  (K)  constants. 

3.  Establish  the  value  pointer  within  a  second  loop  (J  =  1  to  25). 

4.  Calculate  the  J-dependent  constants. 

5.  Calculate  the  up  and  down  sweep  voltage  values  for  RPA  and  the  normal  (4  second)  EP 
sweeps. 

6.  During  the  first  3  iterations  of  the  seconds  index,  calculate  up  and  down  sweep  voltage  values 
for  the  EP  bias  or  calibration  (3  second)  sweeps. 

7.  During  the  first  2  iterations  of  the  seconds  index,  calculate  the  up  and  down  sweep  voltage 
values  for  the  EP  Mode  E  short  (2  second)  sweeps. 

8.  If  the  diagnostic  print  switch  is  set  (  >  0  )  print  the  calculated  voltage  values  to  the  HSP. 

9.  Return  to  Subroutine  INIT. 

d.  Outputs. 

1.  COMMON  blocks. 


/SWPVLT/ 

SVOLTS  - 

Array  of  calculated  sweep  voltages 

NOTE:  SVOLTS(I,  J,  K)  is  arranged  such  that: 

I 

=  (1,2,. ...25) 

points  to  the  sweep  voltages  within  a  given  second. 

J 

=  (1) 

points  to  down  sweeps. 

=  (2) 

points  to  up  sweeps. 

K 

=  (1,.,4) 

points  to  the  Klb  second  of  the  normal  EP  sweep. 

K 

=  (5,  6,  7) 

points  to  the  (K-4)th  second  of  the  EP  bias  sweep 

K 

=  (8,  9) 

points  to  the  (K-7)!h  second  of  the  EP  short  sweep 

K 

=  (10,.., 13) 

points  to  the  K"1  second  of  the  RPA  sweep. 
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e.  Associated  subroutines. 


None, 
f.  Interfaces. 

1.  Called  from  Subroutine  INIT. 

2.  Uses  COMMON  block  SWPVLT. 

2.4.2.3  Subroutine  OPNPRP. 

a.  Function. 

Open  the  designated  IESPREPFILE  and  read  the  Readout  Information  Record  (RIR). 

b.  Inputs. 

1.  Argument  list. 

ISSDGP  -  Diagnostic  print  switch 

2.  Files. 

The  first  10  words  of  the  RIR  record  are  read  in  from  the  IESPREPFILE. 

c.  Processing. 

1.  Open  the  designated  IESPREPFILE. 

2.  If  the  OPEN  was  successful,  read  the  first  record  of  the  IESPREPFILE  and  store  the  first  10 
words  of  the  RIR  into  COMMON  block  /PREPFL/. 

3.  Set  the  NFRAME  pointer  to  60  to  signal  Subroutine  RDPREP  that  a  1  minute  data  record  needs 
to  be  read  from  the  IESPREPFILE. 

4.  If  an  OPEN  error  was  encountered,  invoke  Subroutine  FILERR  to  set  the  necessary  error  statuses 
and  set  the  return  status  flag  to  -1.  If  no  error  is  encountered,  this  status  is  set  to  0. 

4.  Return  to  Subroutine  INIT. 

d.  Outputs. 

1.  Argument  list. 

IDMISS  -  Mission  ID  from  RIR  data 

ISTAT  -  Return  status 
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2.  COMMON  blocks. 


/PREPFL/ 

RIR  -  10  words  of  RIR  data 

NFRAME  -  Telemetry  data  frame  pointer 

e.  Associated  subroutines. 

1.  Subroutine  FILERR.  File  error  diagnostic  control  routine  (see  2.4.8.5). 

f.  Interfaces. 

1.  Called  from  Subroutine  INIT. 

2.  Uses  COMMON  block  PREPFL. 


2.4.2.4  Subroutine  VEHPAR. 


a.  Function. 


Load  the  proper  processor  control  information  and  instrument  constants  for  the  DMSP  spacecraft 
whose  data  are  being  processed. 


b.  Inputs. 


1.  Argument  list. 

IDMISS  -  Satellite  mission  ID 

ISSDGP  -  Diagnostic  print  switch 

2.  COMMON  blocks. 


/SATPAR/ 


IDFLT 

INFVEH 

MISSN 

NUMSAT 


Satellite  flight  ID 

Vehicle  processor  control  and  instrument  constant  information  block 
Valid  mission  IDs 

Number  of  satellites  for  which  control  information  is  available 


3.  Files. 

None. 


c.  Processing. 

1.  Compare  the  current  satellite  ID  to  the  list  of  satellite  IDs  contained  in  file  IESCNTRLFILE. 
This  information  was  loaded  into  COMMON  block  SATPAR  during  program  initialization. 

2.  If  the  satellite  information  is  available  for  the  requested  satellite,  load  the  information  into  the 
processor  control  COMMON  blocks. 
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3.  Print  a  diagnostic  message  if  the  satellite  ID  is  not  contained  in  IESCNTRLFILE. 

4.  Return  a  status  flag  indicating  an  error  if  the  satellite  was  not  contained  in  the  file. 


d.  Outputs. 

1.  Argument  list. 

ISTVP 

2.  COMMON  blocks. 

/PROCON/ 

IFLT 

INFODG  - 
INFOPR  - 
MISSID 

/SMCON/ 

INFOSM  - 

/EPCON/ 

INFOEP  - 

/RPACON/ 

INFORP  - 

/DMCON/ 

INFODM  - 

/CKLCON/ 

INFOCK  - 

/MPCON/ 

INFOMP  - 

/DFCON/ 

FCONV  - 

3.  Files. 

None. 


Subroutine  action  status  flag 


Flight  ID 

Diagnostic  print  flags 
Processor  action  control  flags 
Satellite  mission  ID 


SM  processor  constants 


EP  processor  constants 


RPA  processor  constants 


DM  processor  constants 


CKL  processor  constants 


MP  processor  constants 


OLS  data  word  conversion  constants 
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e. 


Associated  subroutines. 


None, 
f.  Interfaces. 

1.  Called  from  Subroutine  INIT. 

2.  Uses  COMMON  blocks  SATPAR,  PROCON,  SMCON,  EPCON,  RPACON,  DMCON,  CKLCON, 
MPCON,  and  DFCON. 

2.4.2.5  Subroutine  OPNEDR. 

a.  Function. 

Open  and  initialize  file  IESEDRFILE. 

b.  Inputs. 

1.  Argument  list. 

NUMSAT  -  Number  of  active  satellites 

IDFLT  -  Flight  IDs  of  the  active  satellites 

2.  COMMON  blocks. 

/IONUM/ 

LUEDR  -  Logical  unit  for  IESEDRFILE 

3.  Files. 

IESEDRFILE.  The  header  block  for  the  first  satellite  stored  in  the  file  is  input.  See  33.2.2 
for  a  description  of  the  contents  of  the  header  block. 

c.  Processing. 

1.  Open  file  IESEDRFILE. 

2.  If  the  OPEN  was  successful,  set  the  return  status  flag  to  zero  and  reinitialize  the  file  as  follows: 

(a)  Write  out  a  warning  that  the  file  is  being  reinitialized,  disable  the  PRINTAWAY  processor, 
and  set  the  console  message  flag  to  indicate  that  the  HSP  should  be  examined  (Subroutine 
PRNTON). 

(b)  Zero  out  the  processing  status  flag  array  (IBPFLG). 

(c)  Set  up  an  initial  header  array  for  each  satellite  specified  by  IESCNTRLFILE  and  write  it 
(with  the  zeroed  IBPFLG  array)  out  to  file  IESEDRFILE. 

NOTE:  The  necessity  for  the  initialization  procedure  is  a  remnant  of  the  AFGWC  system,  and  is 
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done  to  accommodate  the  logic  built  in  to  the  EDR  output  subroutines.  When  the  EDR 
output  subroutines  are  simplified,  the  initialization  procedure  can  be  eliminated. 


4.  If  an  error  was  encountered,  invoke  Subroutine  FILERR  to  set  the  necessary  error  statuses  and 
set  the  return  status  flag  to  -1. 

5.  Return  to  Subroutine  INIT. 

d.  Outputs. 

1.  Argument  list. 

ISTAT  -  Return  status  flag 

2.  COMMON  blocks. 

/CFINFO/ 

IENREC  -  Number  of  EDR  I/O  blocks  per  satellite 
IENSAT  -  Number  of  active  satellites 

3.  Files. 

If  file  IESEDRFILE  was  initialized,  header  blocks  are  written  to  the  file  for  each  active 
satellite  specified  by  file  IESCNTRLFILE. 

e.  Associated  subroutines. 

1.  Subroutine  PRNTON.  Disable  the  PRINTAWAY  processor  and  set  the  console  error  message 
flag  (see  2.4.8.11). 

3.  Subroutine  FILERR.  File  error  diagnostic  control  routine  (see  2.4.8.5). 

f.  Interfaces. 

1.  Called  from  Subroutine  INIT. 

2.  Uses  COMMON  blocks  CFINFO,  EDRWRK,  and  IONUM. 

2.4.2.6  Subroutine  OPNAPX. 
a.  Function. 

Open  file  IESAPEXTABLE  and  read  the  Apex  coordinate  conversion  table  information  into 
COMMON  APXLUT. 
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b.  Inputs. 


1.  COMMON  blocks. 

/IONUM/ 

LUAPEX  -  Logical  unit  for  file  IESAPEXTABLE 

2.  Files. 

The  entire  contents  of  file  IESAPEXTABLE  are  read  in.  See  33.2.8  for  the  contents, 

c.  Processing. 

1.  Open  the  file. 

2.  Read  in  the  contents. 

3.  Close  the  file. 

4.  If  an  error  was  encountered,  invoke  Subroutine  FILERR  to  set  the  necessary  error  statuses  and 
set  the  return  status  flag  to  -1.  If  no  error  is  encountered,  this  status  is  set  to  0. 

5.  Return  to  Subroutine  INIT. 


d.  Outputs. 


1.  Argument  list. 


ISTAT 


Return  status 


2.  COMMON  blocks. 


/APXLUT/ 


ALTAPX  - 
XO,YO,ZO  - 
UO 

TABLE 


Altitude  for  which  the  information  is  valid 
Offset  components  of  offset  dipole  system 
Rotation  matrix  for  offset  dipole  system 
Apex  coordinate  look-up  table 


e.  Associated  subroutines. 


1.  Subroutine  FILERR.  File  error  diagnostic  control  routine  (see  2.4.8.5). 

f.  Interfaces. 


1.  Called  from  Subroutine  INIT. 

2.  Uses  COMMON  blocks  APXLUT  and  IONUM. 


4 


1 
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2A.2.1  Subroutine  OPNXFR. 


a.  Function. 

Open  AGDB  summary  record  transfer  file  1. 

b.  Inputs. 

1.  COMMON  blocks. 

/IONUM/ 

LUXFR  -  Logical  unit  for  file  IESAGDBXFRn 
/PROCON/ 

IRDATE  -  Current  date  (YYMMDD) 

IRTIME  -  Current  time  (HHMMSS) 

2.  Files. 

None 

c.  Processing. 

1.  Set  the  transfer  file  number  to  1. 

2.  Open  transfer  file  1. 

3.  If  the  OPEN  was  successful,  set  the  lock  flag  to  99  and  write  lock  flag,  current  date,  and  current 
time  to  the  first  record  of  the  file,  and  set  the  return  status  to  zero. 

4.  Write  a  diagnostic  message  to  HSP  designating  that  file  1  was  selected. 

5.  If  an  error  was  encountered  set  the  return  status  flag  to  -1. 

6.  Return  to  Subroutine  INIT. 

NOTE:  The  transfer  files  are  a  remnant  of  AFGWC  processing,  and  are  probably  of  no  use  for  SFC 
processing  purposes. 

d.  Outputs. 

1.  Argument  list. 

ISTAT  -  Return  status 

2.  COMMON  blocks. 

/PROCON/ 

NFXFR  -  Transfer  file  used  (always  1) 
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e.  Associated  subroutines. 


None, 
f.  Interfaces. 

1.  Called  from  Subroutine  IN  IT. 

2.  Uses  COMMON  blocks  IONUM  and  PROCON. 


2.4.2.8  Subroutine  OPNSTF. 


a.  Function. 


Open  and  initialize  file  IESSTATFILE. 


b.  Inputs. 


1.  Argument  list. 

NUMSAT 

MISSN 

IDFLT 


Number  of  active  satellites 
Mission  IDs  of  the  active  satellites 
Flight  IDs  of  the  active  satellites 


2.  COMMON  blocks. 


/IONUM/ 

LUSTF  -  Logical  unit  for  file  IESSTATFILE 


3.  Files. 


None. 


c.  Processing. 

1.  Open  file  IESSTATFILE. 

2.  If  the  OPEN  was  successful,  initialize  the  file  as  follows: 

(a)  Write  out  the  header  information  for  each  of  the  three  satellite  sections  of  the  file  with  the 
Mission  ID  and  Flight  ID  for  each  active  satellite,  with  the  last  update  (LSTUPD)  and  last 
displayed  (LSTDIS)  times  set  to  -1  and  the  number  of  REVs  flag  (NREVS)  set  to  zero  (0). 

(b)  Write  out  a  warning  that  the  file  is  being  reinitialized,  disable  the  PRINTAWAY  processor, 
and  set  the  console  message  flag  to  indicate  that  the  HSP  should  be  examined  (Subroutine 
PRNTON). 

3.  If  an  error  was  encountered,  invoke  Subroutine  FILERR  to  set  the  necessary  error  statuses  and 
set  the  return  status  flag  to  -1.  If  no  error  is  encountered,  this  status  is  set  to  0. 


* 
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4.  Return  to  Subroutine  INIT. 


d.  Outputs. 

1.  Argument  list. 

ISTAT  -  Return  status 

2.  Files. 

If  file  IESSTATFILE  was  initialized,  header  blocks  are  written  to  the  file  for  each  active 
satellite  specified  by  file  IESCNTRLFILE. 

e.  Associated  subroutines. 

1.  Subroutine  PRNTON.  Disable  the  PRINTAWAY  processor  and  set  the  console  error  message 
flag  (see  2.4.8.11). 

2.  Subroutine  FILERR.  File  error  diagnostic  control  routine  (see  2.4.8.5). 

f.  Interfaces. 

1.  Called  from  Subroutine  INIT. 

2.  Uses  COMMON  block  IONUM. 


2.4.3  Subroutine  INPUT, 
a.  Function. 


Control  the  flow  of  data  to  the  individual  instrument  processors.  Figure  7  is  a  hierarchy  chart  for 
this  module. 


INPUT: 

acquire  and  distribute  SSIES-2  data 

.  RDPREP 

acquire  a  one  minute  data  record  from  IESPREPFILE 

.  EPHEM: 

prepare  ephemeris  information  for  processing 

.  .  TIMCON: 

convert  between  UT  and  IES  reference  minutes 

.  .  LATLON: 

calculate  latitude  and  longitude  from  orbit  parameters 

.  .  APXTAB: 

convert  to  APEX  latitude  and  longitude 

. . .  OFFSET: 

convert  between  geographic  and  magnetic  dipole  coordinates 

.  .  .  INTERP: 

interpolate  from  a  list  of  values 

.  .  PRNTON: 

set  PRINTAWAY  status  for  conclusion  of  processing 

.  CHEKIT: 

assess  validity  of  one-second  data  frame 

.  DECODE: 

distribute  data  frame  values  for  processing,  in  proper  units 

.  .  DSMSTT: 

determine  instrument  status  from  DSM  subcom 

.  .  DECDMP: 

print  data  frame  information,  for  diagnostics 

.  HSKPNG: 

acquire  and  assess  sensor  housekeeping  data 

Figure  7  INPUT  module  hierarchy  chart 
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b.  Inputs. 


1.  Argument  list. 

None. 

2.  COMMON  blocks. 

/PROCON/ 

ISSDGP  - 

Diagnostic  print  switch 

/PREPFL/ 

IDATSEC  - 

Array  of  raw  data  frame  times 

IPHBLK  - 

Array  of  ephemeris  data  values 

IRAWVAL  - 

Array  of  raw  data  values 

NFRAME  - 

Pointer  to  current  data  frame 

3.  Files. 

None. 

c.  Processing. 

One  minute  data  records  are  retrieved  from  the  IESPREPFILE.  One  second  segments  of  the 
record  are  decoded,  and  each  instrument  processor  is  given  the  opportunity  to  apply  the  data. 
Some  of  the  individual  instrument  processors  must  keep  counters  and  indices  updated,  thus 
requiring  that  a  zero  data  frame  be  passed  around  for  missing  data  seconds.  In  addition,  some 
processors  can  handle  only  a  few  missing  seconds  without  having  to  reinitialize.  As  a  result, 
several  flags  are  provided  indicating  current  input  status. 

The  duplicate  frame  flag  is  the  result  of  a  problem  identified  during  hardware  testing.  Due  to 
timing  within  the  OLS  sequence  of  events,  a  duplicate  data  frame  can  be  received  in  the  data 
stream.  Space  Division  has  requested  that  the  occurrence  be  identified  and  a  count  summary 
provided. 

1.  If  the  frame  pointer  NFRAME  is  60,  the  previous  1  minute  data  record  has  been  processed. 
Invoke  Subroutine  RDPREP  to  read  the  next  1  minute  data  record.  If  NFRAME  is  less  than 
60,  go  to  step  3. 

2.  If  the  read  was  successful,  set  the  frame  pointer  to  zero  and  invoke  Subroutine  EPHEM  to 
decode  the  satellite  ephemeris  information  accompanying  the  one  minute  PREPFILE  record. 
If  the  ephemeris  record  is  bad,  set  the  general  reset  flag  and  read  to  the  next  record.  If  there 
are  successive  (10  or  more)  bad  ephemeris  records,  set  the  termination  flag  to  end  the  run. 

3.  Increment  the  frame  pointer  and  invoke  Subroutine  CHEKIT  to  determine  that  data  frame 
validity. 

4.  If  the  data  are  not  valid  and: 

a.  this  is  the  beginning  of  the  run,  go  back  to  step  3. 
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b.  this  is  not  the  beginning  of  the  run,  pass  a  zero  frame  through  the  instrument  processing 
routines. 

5.  If  the  data  are  valid,  invoke  Subroutine  DECODE  to  convert  the  raw  data  into  engineering 
parameters. 

6.  Invoke  Subroutine  HSKPNG  to  update  the  sensor  housekeeping  data. 

7.  If  the  diagnostic  print  switch  is  set,  write  diagnostic  output  to  the  standard  output  file. 

8.  Return  to  the  main  routine. 


d.  Outputs. 


1.  Argument  list. 

THEEND  -  End  of  all  unprocessed  data  flag 

2.  COMMON  blocks. 


/PROCON/ 


GRESET  - 
NEWREV  - 
NEWSAT  - 
NUMREV  - 


General  reset  indicator  flag  for  the  instrument  processors 
Data  from  different  readout  indicator  flag 
Data  from  different  satellite  indicator  flag 
Readout  REV  number 


3.  Files. 

None. 

e.  Associated  subroutines. 


1.  Subroutine  RDPREP.  Read  the  next  record  from  the  1ESPREPFILE  (see  2.4.3. 1). 

2.  Subroutine  EPHEM.  Provide  vehicle  ephemeris  and  orbital  parameters  (see  2.4.3.2). 

4.  Subroutine  CHEKIT.  Determine  the  validity  of  the  data  frame  (see  2.4.3.3). 

5.  Subroutine  DECODE.  Convert  raw  telemetry  data  to  engineering  parameters  (see  2.4.3.4). 

6.  Subroutine  HSKPNG.  Update  sensor  housekeeping  data  (see  2.4.3.5). 

f.  Interfaces. 


1.  Called  from  main  program. 

2.  Uses  COMMON  block  PROCON. 
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2.4.3.1  Subroutine  RDPREP. 


a.  Function. 

Read  a  one  minute  data  record  from  the  IESPREPFILE. 


b.  Inputs. 


1.  Argument  list. 

None 

2.  COMMON  blocks. 


/PREPFL/ 

NODYMD  - 

/PTIMES/ 

JDAY1 
IPTIM1 
NSECSP  - 


Packed  year,  month,  and  day  of  last  ascending  node  from  RIR  data 


Julian  day  of  interest  for  limited  processing 
Start  time  in  seconds  for  limited  processing 
Number  of  seconds  of  limited  processing 


3.  Files. 

A  data  record  is  read  from  the  IESPREPFILE. 

c.  Processing. 

1.  Read  the  next  sequential  record  of  the  IESPREPFILE. 

2.  If  the  read  was  not  successful,  set  the  termination  flag  (THEEND)  to  .TRUE.,  write  the  I/O  status 
to  the  print  file,  and  return  to  Subroutine  INPUT. 

3.  If  the  read  was  successful: 

a.  store  the  packed  nodal  year,  month,  and  day  from  the  RIR  record  into  the  28th  word  of 
the  ephemeris  block. 

b.  If  limited  processing  was  selected  and  the  data  record  time  is  lower  than  the  start  time,  go 
back  to  step  1. 

c.  If  limited  processing  was  selected  and  the  data  record  time  is  greater  than  the  end  time, 
set  the  termination  flag  to  .TRUE,  and  return  to  Subroutine  INPUT. 

4.  Return  to  Subroutine  INPUT. 
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d.  Outputs. 


1.  Argument  list. 

THEEND  -  Termination  flag 

IRDSTAT  -  VAX  I/O  status  value  from  read  operation 

2.  COMMON  blocks. 

/PREPFL/ 

IDATSEC  -  Array  of  one  second  data  frame  times 

IPHBLK  -  Ephemeris  data  block 

IRAWVAL  -  Array  of  raw  data  frame  values 

NFRAME  -  Pointer  to  current  data  frame 

3.  Files. 

None. 

e.  Associated  subroutines. 

None. 

f.  Interfaces. 

1.  Called  from  Subroutine  INPUT. 

2.  Uses  COMMON  blocks  PREPFL  and  PTIMES. 


2.4.3.2  Subroutine  EPHEM. 

a.  Function. 

Put  satellite  location  information  into  COMMON  block  SATEPH  for  use  by  other  processing 
modules  in  the  program.  This  information  is  constructed  from  an  estimate  of  the  DMSP  orbit 
calculated  by  fitting  a  circular  orbit  to  two  satellite  locations  from  the  ephemeris  records  read  in 
from  file  IESPREPFILE  with  each  one-minute  block  of  data  frames. 

b.  Inputs. 

1.  Argument  list. 

NEWSAT  -  New  satellite  flag  (LOGICAL) 

NEWREV  -  New  readout-REV  flag  (LOGICAL) 

EPHBLK  -  28-word  ephemeris  block  (see  3.3.2. 1) 

IPHBLK  -  Integer  equivalenced  to  EPHBLK 
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2.  COMMON  blocks. 


/PIDEG/ 

DEG  -  Degrees  to  radians  conversion  factor 

PI  -  Value  of  n 

TWOPI  -  Value  of  In 

Note:  The  ephemeris  block  is  identical  to  the  ephemeris  block  stored  in  file  IESPREPFILE 
with  the  exception  of  word  28  in  which  the  date  (YYMMDD,  integer)  of  the  last  ascending 
node  crossing  of  the  readout  REV  has  been  added  by  Subroutine  RDPREP  (see  2.4.3.I.) 


c.  Processing. 

1.  Remove  the  necessary  information  from  the  ephemeris  block,  converting  degrees  to  radians  and 
nautical  miles  to  kilometers  (lnm  =  1.852km). 

2.  Use  the  date  stored  in  word  28  of  the  ephemeris  block  to  calculate  the  correct  date.  If  this  date  is 
incompatible  with  the  day-of-year  in  the  rest  of  the  ephemeris  block,  generate  an  error  message, 
increment  the  bad  ephemeris  counter  (NBAD),  do  one  of  the  following,  and  return  to  Subroutine 
INPUT: 


(a)  If  this  is  the  tenth  bad  ephemeris  block  in  the  current  readout  REV,  write  out  another  error 
message,  set  the  return  status  to  -2  (which  alerts  Subroutine  INPUT  to  abandon  this  REV), 
disable  the  PRINT  AW  AY  processor,  and  set  the  console  error  message  to  alert  the  operator 
that  something  has  gone  wrong  (Subroutine  PRNTON). 

(b)  Otherwise,  set  the  return  status  to  -1,  which  alerts  Subroutine  INPUT  to  drop  the  current  one 
minute  data  block  and  try  the  next  one. 

3.  Check  the  times  in  the  ephemeris  block.  If  the  difference  in  the  two  times  is  more  than  2  seconds 
from  the  expected  60-second  difference,  write  out  an  error  message,  jump  to  the  error  section 
described  in  step  2,  and  return  to  Subroutine  INPUT. 

4.  Check  the  altitudes  in  the  ephemeris  block.  If  the  average  altitude  is  more  than  75  km  away  from 
the  nominal  altitude  of  825  km,  write  out  an  error  message,  jump  to  the  error  section  described  in 
step  2,  and  return  to  Subroutine  INPUT.  If  the  average  altitude  is  good,  also  calculate  the 
altitude  change  per  one-second  step  (DSALT)  and  the  radius  of  the  orbit  (A). 

5.  Calculate  the  nominal  inclination  angle  for  a  sun-synchronous,  circular  orbit  of  radius  A  from: 


where:  i 
Re 


=  COS 


-1 


-9 . 892  X  10 


A_ 
R „ 


0.5 


(DMSPI)  is  the  orbital  inclination, 
is  the  radius  of  the  earth. 


The  angular  (OMEGA)  and  orbital  (VSC)  velocities  for  this  orbit  are  calculated  from: 
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and 


fl  = 


rad  /  sec 


3.986013  x  10s) 


vg  =  ACl  x  103  m/ sec 


6.  Determine  which  of  the  latitude/longitude  pairs  in  the  ephemeris  block  to  use  in  the  orbit 
calculation.  This  will  always  be  the  first  pair  unless  the  first  location  is  too  close  to  the  equator 
(this  can  cause  computational  stability  problems).  In  this  case,  the  location  farther  from  the 
equator  is  used. 

7.  Calculate  the  longitude  (in  a  non-rotating  frame)  of  the  last  ascending  node  in  the  current  orbit 
(ANLON)  from: 


e' 


0  -  cos-1 


where:  <f>0 
A, 6 


(PHIO)  is  the  angular  distance  along  the  orbit  from  the  last  ascending  node  to  the 
location  used  in  the  calculation, 
are  the  latitude  and  longitude. 


Calculate  the  inclination  of  the  orbit  (ORBINC)  (this  time  from  the  observed  satellite  locations) 
from: 


1  =  cos 


8.  If  the  orbital  inclination  calculated  from  the  ephemeris  locations  (ORBINC)  is  more  than  5° 
different  from  the  nominal  inclination  calculated  from  the  altitude  (DMSPI),  then: 

(a)  If  the  location  used  to  calculate  ORBINC  is  within  0.04  radians  (~2.3°)  of  the  equator,  use 
the  nominal  inclination,  as  the  inclination  calculated  from  the  locations  may  well  be  in  error 
for  a  location  close  to  the  equator. 

(b)  Otherwise,  write  out  an  error  message,  jump  to  the  error  section  describe  in  step  2,  and  return 
to  Subroutine  INPUT. 

9.  Convert  the  ascending  node  longitude  to  the  earth-fixed  rotating  frame,  reset  variable  PHIO  to  the 
value  of  PHI1  if  the  second  set  of  locations  was  used  in  the  orbit  calculations,  and  calculate  the 
time  correction  parameter  used  in  calculating  locations  from  the  orbital  parameters  (TO),  which  is 
the  negative  of  the  time  since  the  last  ascending  node. 

10.  Calculate  the  locations  required  for  the  arrays  in  COMMON  block  SATEPH  use  by  the  CKLPRC 
module.  These  eight  locations  are  spaced  10  seconds  apart  in  time,  with  the  first  time  being  set  to 
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the  last  time  previous  to  the  current  time  with  seconds  ending  in  5,  i.e.,  if  the  current  time 
(HHMMSS)  is  134401,  the  first  time  would  be  134355.  The  time  (seconds  since  midnight)  and 
date  (day-of-year)  are  loaded  into  arrays  ITCSL  and  IDAY,  and  the  satellite  latitude  and  longitude 
(from  Subroutine  LATLON),  Apex  latitude,  longitude,  and  local  time  (from  Subroutine 
APXTAB),  and  altitude  for  these  times  are  loaded  in  the  first  eight  locations  in  arrays  GLAT, 
GLON,  APXLAT,  APXLON,  APXLT,  and  ALTSC. 

11.  Calculate  the  locations  used  in  building,  and  as  inputs  to,  EDRs  in  the  OUTPUT  module.  These 
six  locations  are  spaced  20  seconds  apart  in  time,  with  the  first  time  being  set  to  the  last  time 
previous  to  the  current  time  with  second  equal  to  00,  i.e.  if  the  current  time  is  081456,  the  first 
time  would  be  081400.  The  time  (seconds  since  midnight)  and  date  (YYMMDD)  are  loaded  into 
arrays  ITEDR  and  IYMD,  and  the  same  location  parameters  described  in  step  10  are  loaded  in 
the  last  six  locations  of  arrays  GLAT,  GLON,  APXLAT,  APXLON,  APXLT,  and  ALTSC. 

12.  Reset  the  time  correction  parameter  (TO)  and  the  orbital  distance  from  the  last  ascending  node 
(PHI0)  to  their  values  corresponding  to  the  first  time  in  ITCSL. 

13.  Set  the  return  status  to  0  and  return  to  Subroutine  INPUT, 
d.  Outputs. 

1.  Argument  list. 

ISTAT  -  Return  status 

0:  No  errors 

-1:  Bad  ephemeris  record,  skip  this  data  block 
-2:  Tenth  bad  ephemeris  record,  drop  this  REV 

2.  COMMON  blocks. 


/SATEPH/ 

ITCKL 

Times  for  CKLPRC  module  (seconds  since  midnight) 

IDAY 

Dates  for  CKLPRC  module  (day-of-year) 

ITEDR 

Time  for  OUTPUT  module  (seconds  since  midnight) 

IYMD 

Dates  for  OUTPUT  module  (YYMMDD) 

GLAT 

Geographic  latitude  (deg) 

GLON 

Geographic  longitude  (deg) 

APXLAT  - 

Apex  latitude  (deg) 

APXLON  - 

Apex  longitude  (deg) 

APXLT 

Apex  local  time  (hours) 

ALTSC 

Satellite  altitude  (km) 

VSC 

Satellite  orbital  velocity  (m/sec) 

PHI0 

Angle  in  orbit  at  time  ITCKL(l)  (rad) 

OMEGA  - 

Satellite  angular  velocity  (rad/sec) 

ORBINC  - 

Inclination  of  satellite  orbit  (rad) 

ANLON  - 

Last  ascending  node  longitude  (rad) 

ID 

Time  parameter  (negative  seconds  to  last  ascending  node) 
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e.  Associated  subroutines. 


1.  Subroutine  TIMCON.  Convert  between  date/time  and  IES  minutes  (see  2.4.8.12). 

2.  Subroutine  LATLON.  Calculate  the  geographic  latitude  and  longitude  of  the  satellite  for  an  input 
time  (see  2.4.8.7). 

3.  Subroutine  APXTAB.  Calculate  the  Apex  latitude  and  longitude  for  an  input  geographic  latitude 
and  longitude  (see  2.4.3.2.1). 

4.  Subroutine  PRNTON.  Disable  the  PRINTAWAY  processor  and  set  the  console  error  message 
flag  (see  2.4.8.11). 

f.  Interfaces. 

1.  Called  from  Subroutine  INPUT. 

2.  Uses  COMMON  blocks  PIDEG  and  SATEPH. 


2.4.3.2.1  Subroutine  APXTAB. 

a.  Function. 

Use  a  look-up  table  from  file  IESAPEXTABLE  to  convert  an  input  geographic  latitude  and 
longitude  to  modified  Apex  latitude  and  longitude  valid  for  an  altitude  of  840  km.  See  reference 
1.2.3o  for  a  description  of  the  modified  Apex  coordinate  system.  In  this  document,  these 
coordinates  will  be  simply  referred  to  as  Apex  coordinates. 

b.  Inputs. 

1.  Argument  list. 

GLAT  -  Geographic  latitude  (deg) 

GLON  -  Geographic  longitude  (deg) 

2.  COMMON  blocks. 

/APXLUT/ 

TABLE  -  Apex  coordinate  look-up  table 

c.  Processing. 

1.  Convert  the  geographic  latitude  and  longitude  to  offset-dipole  latitude  and  longitude  (Subroutine 
OFFSET). 

2.  Select  a  4x4-point  subgrid  (APXGRD)  from  the  look-up  table  centered  on  the  offset-dipole 
coordinates. 

3.  Check  the  selected  subgrid  Apex  longitude  values  for  the  discontinuity  at  the  longitude  "wrap¬ 
around"  point  (359.999...°  to  0°).  If  the  discontinuity  falls  within  the  subgrid,  bias  all  longitudes 
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less  than  180°  by  360°  to  avoid  interpolation  problems. 

4.  Calculate  the  distance  (in  degrees)  in  latitude  (GRLAT)  and  longitude  (GRLON)  from  a 
reference  grid  point  for  interpolation. 

5.  Use  a  polynomial  interpolation  routine  to  interpolate  in  both  the  Apex  latitude  and  Apex 
longitude  tables  to  the  offset-dipole  coordinates. 

6.  Correct  the  Apex  longitude  calculated  if  the  biasing  introduced  in  step  3  leads  to  a  longitude  > 
360°. 

7.  Return  to  Subroutine  EPHEM. 

d.  Outputs. 

1.  Argument  list. 

APXLAT  -  Apex  latitude  (deg) 

APXLON  -  Apex  longitude  (deg) 

e.  Associated  subroutines. 

1.  Subroutine  OFFSET.  Convert  geographic  latitude  and  longitude  to  offset-dipole  latitude  and 
longitude  (see  2.4.3.2.2). 

2.  Subroutine  INTERP.  Interpolate  within  a  vector  table  using  a  polynomial  fit  to  the  input  table 
(see  2.4.3.23). 

f.  Interfaces. 

1.  Called  from  Subroutine  EPHEM. 

2.  Uses  COMMON  block  APXLUT. 

2.43.2.2  Subroutine  OFFSET. 

a.  Function. 

Convert  between  geographic  coordinates  and  offset  dipole  coordinates. 

b.  Inputs. 

1.  Argument  list. 

RLAT1  -  Latitude  to  convert  from  (rad) 

RLON1  -  Longitude  to  convert  from  (rad) 

MODE  -  Conversion  direction 

1:  To  offset  dipole  coordinates 
2:  To  geographic  coordinates 
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2.  COMMON  blocks. 


/APXLUT/ 

ALT  -  Altitude  of  Apex  look-up  table  (km) 

XO,YO,ZO  -  Location  of  offset  dipole  center 
UO  -  Offset  transformation  matrix 

c.  Processing. 

1.  On  the  first  call  to  this  routine,  set  up  all  offset  constants. 

2.  Convert  the  input  latitude  and  longitude  to  Cartesian  coordinates. 

3.  If  converting  from  offset  to  geographic,  then: 

(a)  Correct  for  altitude  for  the  dipole  offset. 

(b)  Correct  for  the  dipole  offset. 

(c)  Rotate  from  the  offset  dipole  orientation  to  geographic  orientation. 

4.  If  converting  from  geographic  to  offset,  then: 

(a)  Rotate  to  the  dipole  orientation  and  subtract  the  offsets. 

5.  Convert  the  Cartesian  coordinates  back  into  latitude  and  longitude. 

6.  Return  to  Subroutine  APXTAB. 

d.  Outputs. 

1.  Argument  list. 

RLAT2  -  Converted  latitude  (rad) 

RLON2  -  Converted  longitude  (rad) 

e.  Associated  subroutines. 

None. 

f.  Interfaces. 

1.  Called  by  Subroutine  APXTAB. 

2.  Uses  COMMON  blocks  APXLUT,  PIDEG. 


2.43.2.3  Subroutine  INTERP. 
a.  Function. 

Interpolate  in  a  vector  list  using  a  polynomial  interpolation  technique. 
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b.  Inputs. 


1.  Argument  list 


XI 

- 

Value  to  interpolate  to 

NP1 

- 

Number  of  data  points  in  the  vector  list 

Y 

- 

Data  vector  in  which  to  interpolate 

LOG 

- 

Log  fit  switch  (LOGICAL): 

.TRUE.  -  Interpolate  in  loglO  of  Y 
.FALSE.  -  Do  not  use  logs 


c.  Processing. 

1.  Convert  the  inputs  to  double  precision,  and,  if  requested,  to  loglO. 

2.  Calculate  the  coefficients  of  an  interpolation  polynomial  (Newton  form). 

3.  Use  the  polynomial  to  interpolate  to  XI. 

4.  Convert  the  interpolated  value  to  single  precision,  and,  if  the  interpolation  was  done  in  loglO  of 
Y,  anti-log  the  interpolated  value. 

5.  Return  to  Subroutine  APXTAB. 

d.  Outputs. 

1.  Argument  list. 

YI  -  Interpolated  value 

e.  Associated  subroutines. 

None. 

f.  Interfaces. 

1.  Called  by  Subroutine  APXTAB. 

2.  Uses  no  COMMON  blocks. 


2.4.3.3  Subroutine  CHEKIT. 
a.  Function. 

Determine  the  validity  of  the  data  contained  in  the  current  1  second  data  frame. 
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b.  Inputs. 


1.  Argument  list. 

ICKOLS  -  Raw  data  values  from  current  frame 

INTIME  -  Input  data  frame  time 

ISSDGP  -  Diagnostic  print  switch 

2.  COMMON  blocks. 

None. 

3.  Files. 

None. 


c.  Processing. 

A  maximum  of  five  consecutive  invalid  frames  is  allowed  before  a  general  reset  is  issued  for  the 
instrument  processors.  Zero  data  frames  are  passed  for  invalid  data  frames  or  to  fill  forward  time 
jumps.  After  five  consecutive  invalid  or  missing  frames,  discontinue  sending  zero  frames  and  wait 
for  the  next  good  data  frame.  If  there  is  a  backward  time  jump,  the  termination  flag  (THEEND) 
is  set  to  .TRUE,  to  end  the  run. 

1.  If  this  is  the  first  data  frame  of  a  readout,  initialize  flags  and  counters. 

2.  Test  various  indicators  of  a  bad  frame. 

(a)  Invalid  cycle  counter  (first  data  word). 

(b)  RAM  operation  or  error,  Test  version,  Dump  in  progress,  or  Checksum  error  flags  are  set 
in  data. 

(c)  This  is  a  duplicate  data  frame. 

(d)  Time  discontinuity. 

3.  Keep  track  of  number  of  consecutive  bad  frames  and  set  flags  to  take  the  proper  action  for 
the  various  situations  encountered. 


d.  Outputs. 

1.  Argument  list. 

GRESET 

IFTIME 

IQFRME 


ITJUMP 

THEEND 


General  reset  flag  (LOGICAL) 

Data  frame  time  to  pass  to  processors 
Data  frame  quality  indicator 
-2:  Time  discontinuity 
-1:  Duplicate  data  frame 
0:  Invalid  data 
1:  Valid  data 

Difference  in  seconds  between  current  data  frame  time  and  previous  data 
frame  time 

Termination  flag  (LOGICAL) 
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2. 


COMMON  blocks. 


None. 

3.  Files. 

None. 

e.  Associated  subroutines. 

None. 

f.  Interfaces. 

1.  Called  from  Subroutine  INPUT. 

2.  Uses  no  COMMON  blocks. 


2.4.3.4  Subroutine  DECODE, 

a.  Function. 

Extract  raw  data  from  the  SSIES  sensor  data  block,  convert  the  raw  data  to  engineering  units,  and 
store  the  converted  data  in  COMMON  block  D FRAME  for  use  by  the  instrument  processors. 


b.  Inputs. 


1.  Argument  list. 

IFQUAL 

IFTIME 

INOLS 

ISSDGP 


Current  data  frame  quality 
Current  data  frame  time 
Raw  data  values  from  current  frame 
Diagnostic  print  switch 


2.  COMMON  blocks. 


/DFCON/ 

FCONV  -  Raw  data  word  conversion  constants 


3.  Files. 

None. 


c.  Processing. 

1.  Store  the  data  frame  time  and  data  validity  code. 

2.  If  this  is  a  valid  data  frame: 

a.  Store  indicators  and  flags  which  appear  in  all  data  cycles. 
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b.  Determine  the  data  cycle  (1  or  2)  and  store  the  flags  and  indicators  unique  to  the  cycle  type. 

c.  Convert  and  store  the  raw  data  for  the  data  cycle  type  to  engineering  units. 

d.  If  the  data  are  from  an  IES2  or  subsequent  instrument  configuration,  invoke  Subroutine 
DSMSTT  to  process  the  DSM  subcom  register  data. 

e.  Convert  and  store  the  raw  data  which  appear  in  all  cycles  to  engineering  units. 

f.  Jump  to  step  4. 

3.  If  this  is  an  invalid  data  frame,  increment  and  check  the  cycle  counter  for  rollover. 

4.  If  the  diagnostic  flag  is  set  to  4,  invoke  Subroutine  DECDMP  to  write  the  frame  data  to  the 
standard  print  file. 

5.  Return  to  Subroutine  INPUT, 
d.  Outputs. 

1.  Argument  list. 


LCCNTR  - 

COMMON  blocks. 

Last  frame  cycle  counter 

/D  FRAME/ 

IDTIME  - 

Data  frame  time  (seconds  past  midnight) 

IQFRME  - 

Data  frame  quality  (sO:  bad,  1:  good) 

IDWORD  - 

SSIES  ID  word 

ICYCLE  - 

Cycle  type  (1  or  2) 

ICCNTR  - 

Sweep  program  second  counter  (1-128  or  1-1024) 

ICALIB 

Calibration  mode  flag 

MODEP  - 

EP  sensor  mode: 

0= A,  1=B,  2=BS,  3=C,  4=D,  5=DS,  6= 

IDCONF  - 

Configuration  ID 

IELRPA  - 

EP  or  RPA  current  data  in  telemetry: 

0:  RPA,  1:  EP,  2:  Both 

MONOLS  - 

OLS  command  monitor  (cycle  1) 

MONDSM  - 

DSM  command  monitor  (cycle  2) 

EMTMP  - 

Electrometer  temperature  (cycle  1) 

ELMP 

MP  electron  analysis 

Electron  temperature  (deg  K)(cycle  1) 
Electron  density  (el/cm3)(cycle  2) 

HIMP 

MP  light  ion  analysis 

Light  ion  temperature  (deg  K)(cycle  1) 
Light  ion  density  (ion/cm3) (cycle  2) 

OIMP 

MP  oxygen  ion  analysis 

Oxygen  ion  temperature  (deg  K)(cycle  1) 
Oxygen  ion  density  (ion/cm3)(cycle  2) 
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DMLL 


DM  log  level  A  (cycle  1) 

DM  log  level  B  (cycle  2) 

RELWB1  -  SM  Range  data  (volts) 

WB2RNG  -  FIBA  Wideband  2  Range  data  (volts) 

VPEL  -  MP  vehicle  potential  from  EP  (volts) 

VPION  -  MP  vehicle  potential  from  RPA  (volts) 

DMSIG  -  DM  signal  level  monitor 

ELCTMP  -  DM  electronics  temperature 

SENTMP  -  DM  sensor  temperature 

TMPMON  -  Electronics  temperature  ADC 
VAPER  -  VBias  4-  VipSet  (volts) 

VIPMON  -  Vip  monitor 

VIPSET  -  Vip  setting  (volts) 

VBIAS  -  VBias  from  Vaper  -  VipSet  (volts) 

CURMON  -  MP  input  current  (amps) 

VSP  -  MP  ram  velocity  (m/s) 

IEPFLG  -  MP  flags  for  EP  analysis 

INPFLG  -  MP  flags  for  RPA  analysis 

THERMS  -  Temperature  from  thermistors: 

RPA  (cycle  1) 

EP  (cycle  2) 

IESTYP  -  IES  instrument  ID  code: 

1=IES,  2=IES2,  3=IES2A,  4=IES3 
NSMFIL  -  Number  of  SM  filters 

SMV  -  SM  electrometer/amplifier  (volts) 

EPC  -  EP  current  (amps) 

RPAC  -  RPA  current  (amps) 

DMOFF  -  DM  offset  (volts) 

SMFLT  -  SM  filters  (volts) 

DMFILT  -  DM  filters  (volts) 

3.  Files. 

None. 

e.  Associated  subroutines. 

1.  Subroutine  DSMSTT.  Determine  DM,  SM,  and  SENPOT  settings  from  the  DSM  subcom  words. 

2.  Subroutine  DECDMP.  Write  the  decoded  data  frame  to  the  standard  print  file. 

f.  Interfaces. 

1.  Called  from  Subroutine  INPUT. 

2.  Uses  COMMON  blocks  DFRAME  and  DFCON. 
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2.4.3.4.1  Subroutine  DSMSTT. 


a.  Function. 

Accumulate  bit  settings  from  the  DSM  subcom  over  its  16  second  period. 

b.  Inputs. 

1.  Argument  list. 

ICCNTR  -  Cycle  counter 

ISUBCM  -  DSM  subcom  words 

2.  COMMON  blocks. 

None. 

3.  Files. 

None. 

c.  Processing. 

1.  Accumulate  the  DSM  subcom  register  bits  over  the  16  second  subcom  period  (even  cycles 
only),  zero  filling  and  flagging  register  bits  corresponding  to  missing  frames. 

2.  When  the  subcom  cycle  has  completed,  set  the  completion/error  flag,  and  use  the  register 
values  to  index  to  the  corresponding  status  or  command  values. 

d.  Outputs. 

1.  Argument  list. 

None. 

2.  COMMON  blocks. 


/RGSTAT/ 

IDMSTA  - 

Driftmeter  mode  status 

IWGSTA  - 

Wiggle  level  status 

IRPSTA  - 

Repeller  level  status 

IVBSTA  - 

VBias/SENPOT  status 

IW1STA  - 

WIBAN1  Range  status 

IW2STA  - 

WIBAN2  Range  status 

IRFSTA  - 

SENPOT  relay  flag  status 

ISTSTA 

Subcom  processing  status 

3.  Files. 

None. 
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e.  Associated  subroutines. 


None, 
f.  Interfaces. 

1.  Called  from  Subroutine  DECODE. 

2.  Uses  COMMON  block  RGSTAT. 


2.4.3.5  Subroutine  HSKPNG. 

a.  Function. 

Extract  and  keep  track  of  sensor  housekeeping  data. 

b.  Inputs. 


1.  Argument  list. 

NEWSAT  - 

2.  COMMON  blocks. 


Data  from  different  satellite  flag 


/D  FRAME/ 

ICYCLE  - 

Data  cycle  type  (1  or  2) 

IQFRME  - 

Data  frame  quality  (<;0:  bad,  1:  good) 

IESTYP  - 

IES  instrument  ID  code: 

1=IES,  2=IES2,  3=IES2A,  4 

DMSIG 

DM  signal  level  monitor 

ELCTMP  - 

DM  electronics  temperature 

EMTMP  - 

Electrometer  temperature  (cycle  1) 

TMPMON  - 

Electronics  temperature  ADC 

3.  Files. 

None. 

c.  Processing. 

1.  Retrieve  parameters  of  interest  from  the  decoded  data  frame. 

2.  Calculate  averages  of  the  following  parameters  for  each  satellite. 

(a)  DM  offset  voltage  zero. 

(b)  Electrometer  temperature. 

(c)  DSM  electronics  temperature. 

(d)  ADC  temperature. 
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d.  Outputs. 


1.  Argument  list. 

None. 

2.  COMMON  blocks. 


/SCSOH/ 

AADCTP  - 

Average  ADC  temperature 

ADCTMP  - 

ADC  temperature 

ADMVO  - 

Average  DM  signal  level  monitor 

ADSMTP  - 

Average  DSM  equipment  temperature 

AELTMP  - 

Average  electrometer  temperature 

DMVO 

DM  signal  level  monitor 

DSMTMP  - 

DSM  equipment  temperature 

ELTMP 

Electrometer  temperature 

3.  Files. 

None. 

e.  Associated  subroutines. 
None. 


f.  Interfaces. 

1.  Called  from  Subroutine  INPUT. 

2.  Uses  COMMON  blocks  D FRAME,  DMCON,  and  SCSOH. 


2.4.4  Subroutine  PROCES. 

a.  Function. 

This  subroutine  acts  as  the  driver  for  the  various  SSIES  data  processing  modules  and  the  QC 
module. 

b.  Inputs. 

1.  Argument  list. 

THEEND  -  End-of-data  flag 
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2.  COMMON  blocks. 


/DFRAME/ 

IELRPA  - 

EP  or  RPA  data  in  telemetry: 

0:  RPA,  1:  EP,  2:  Both 

/PROCON/ 

IDORP 

RPAPRC  module  processing  control  flag 

IDOEP 

EPPRC  module  processing  control  flag 

IDODM  - 

DMPRC  module  processing  control  flag 

IDOSM 

SMPRC  module  processing  control  flag 

IDOMP 

MPPRC  module  processing  control  flag 

IDOCK 

CKLPRC  module  processing  control  flag 

IDOQC 

QCPRC  module  processing  control  flag 

ISWCKL  - 

Data  source  for  CkL  analysis 

IRPDGP  - 

RPAPRC  module  diagnostic  output  flag 

IEPDGP  - 

EPPRC  module  diagnostic  output  flag 

IDMDGP  - 

DMPRC  module  diagnostic  output  flag 

ISMDGP  - 

SMPRC  module  diagnostic  output  flag 

IMPDGP  - 

MPPRC  module  diagnostic  output  flag 

ICSDGP  - 

CKLPRC  module  diagnostic  output  flag 

IQCDGP  - 

QCPRC  module  diagnostic  output  flag 

ISSDGP  - 

Processing  control  diagnostic  print  flag 

NEWSAT  - 

New  satellite  flag 

NEWREV  - 

New  readout  REV  flag 

GRESET  - 

General  reset  flag 

c.  Processing. 

1.  If  the  shell  diagnostic  flag  is  set,  indicate  that  Subroutine  PROCES  was  entered. 

2.  Invoke  each  of  the  data  processing  modules  for  which  the  corresponding  processing  flag  is  set  to  a 
value  >  0. 

Note:  For  IES2  and  subsequent  instrument  configurations,  the  EP  or  RPA  processing  modules 
will  not  be  invoked  unless  the  IELRPA  flag  indicates  the  necessary  EP  or  RPA  data  exist 
in  the  frame. 

3.  If  the  shell  diagnostic  flag  is  set,  indicate  that  Subroutine  PROCES  was  left. 

4.  Return  to  the  main  routine. 

d.  Outputs. 

None. 

e.  Associated  subroutines. 

1.  Subroutine  SMPRC.  Process  data  from  the  Scintillation  Meter  sensor  (see  2.4.4.1). 
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2.  Subroutine  EPPRC.  Process  data  from  the  Electron  Probe  sensor  (see  2.4.4.2). 

3.  Subroutine  RPAPRC.  Process  data  from  the  Retarding  Potential  Analyzer  sensor  (see 
2.4.4.3). 

4.  Subroutine  DMPRC.  Process  data  from  the  Drift  Meter  sensor  (see  2.4.4.4). 

5.  Subroutine  MPPRC.  Process  sweep  analyses  from  the  on-board  microprocessor  (see  2.4.4.) 

6.  Subroutine  CKLPRC.  Calculate  scintillation  parameters  from  the  SM  or  EP  sensor  density  data 
(see  2.4.4.6). 

7.  Subroutine  QCPRC.  Perform  data  quality  control  and  build  the  output  record  for  the  processing 
statistics  file  (see  2.4.4.7). 

f.  Interfaces. 

1.  Called  from  the  main  routine. 

2.  Uses  COMMON  blocks  D FRAME  and  PROCON. 


2.4.4.1  Subroutine  SMPRC. 
a.  Function. 

Control  processing  of  the  SM  data  processing  module  which  converts  raw  sensor  data  from  the 
SSIES  Scintillation  Meter  to  estimates  of  ion  density,  N,,  and  AN;  power  spectral  density  (PSD). 
Figure  8  is  a  hierarchy  chart  for  the  SM  data  processing  module.  A  description  of  the  processing 
algorithm  can  be  found  in  Appendix  B.4. 


SMPRC. 

process  scintillation  meter  (SM)  data 

.  RANGE: 

interpret  electrometer/SM-wideband  range  setting  value 

.  .  SMCMD: 

interpret  SM  command  value 

.  PRNTON: 

set  PRINTAWAY  status  for  conclusion  of  processing 

.  ELAMP: 

convert  electrometer/SM-wideband  values  to  ion  density 

.  .  COPY: 

initialize  array  or  transfer  values  between  arrays 

.  .  FND511: 

search  for  range  change  flag  in  SM  data  sequence 

.  .  PRMRNG: 

check  environment  parameters  against  allowed  ranges 

.  COPY: 

initialize  array  or  transfer  values  between  arrays 

.  FILTER: 

convert  SM  filter  band  values  to  power  spectral  density  values 

.  SMDIAG: 

report  SM  processing  diagnostics 

.  .  OPNDOF: 

initialize  diagnostic  output  file 

.  .  .  BITON: 

test  for  bit  setting 

.  .  .  FILERR: 

determine  and  report  file  error  status 

.  .  .  PRNTON: 

set  PRINTAWAY  status  for  conclusion  of  processing 

.  .  FILERR: 

determine  and  report  file  error  status 

Figure  8  SMPRC  module  hierarchy  chart 
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b.  Inputs. 

1.  Argument  list. 

NEWSAT  - 
NEWREV  - 
GRESET  - 
THEEND  - 
IDOSM 


IDIAG 


2.  COMMON  blocks. 

/D  FRAME/ 

IDTIME  - 
IESTYP 

IQFRME  - 
SMV 
SMFLT 
RELWB1  - 
MONDSM  - 

/RPAANL/ 

RPAUR  - 

/SATEPH/ 

VSC 

/SMCON/ 

SMAEFF  - 
SMEQ 
SMAG 
SMAOFF  - 
SMRFIT  - 
VTABLE  - 
SMFG 
SMEOFF  - 
SMFBW  - 
NSMFLT  - 


New  satellite  switch 
New  readout  REV  switch 
General  reset  (LOGICAL) 

End-of-data  flag 
SM  processing  control  switch 

0:  Do  not  process  SM  data 
1:  Process  only  density  data 
2:  Process  only  filter  data 
3:  Process  all  data 
SM  diagnostic  print  switch 

0:  Produce  no  diagnostic  print 
1:  Produce  a  diagnostic  print  file 


Data  frame  time  (seconds  after  midnight,  GMT) 

IES  instrument  ID  code: 

1=IES,  2=IES2,  3=IES2A,  4=IES3 
Data  frame  quality  ($0:  bad,  1:  good) 

One  second  (24  samples  of  SM  electrometer  data  (volts) 
One  second  of  SM  filter  data  (volts) 

SM  range  data  (volts) 

DSM  command  monitor 


Ram  drift  velocity  (meters/sec) 


Satellite  velocity  (meters/sec) 


SM  effective  area  (cm2) 

SM  electrometer  amplifier  gain 
SM  difference  amplifier  gain 
SM  difference  amplifier  offset  (volts) 
Range  data  fit  envelope  (volts) 

Range  data  tables  (volts) 

SM  filter  amplifier  gains 
SM  filter  amplifier  offsets  (volts) 
SM-filter  amplifier  bandwidths  (Hertz) 
Number  of  SM  filters 
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ISMUR  -  Ram  ion  velocity  data-use  flag 

0:  Do  not  use  RPA  ram  drift  velocity 
1:  Use  RPA  ram  drift  velocity 

c.  Processing. 

1.  Reset  processing  flags  for  a  new  satellite,  new  REV,  or  general  reset.  If  no  more  data,  return  to 
Subroutine  PROCES. 

2.  Determine  the  range  settings  on  the  SM  electrometer  and  wide-band  amplifiers  (Subroutine 
RANGE).  If  an  error  was  encountered  alert  the  user,  turn  on  the  print  (Subroutine  PRNTON), 
and  return.  If  the  range  data  has  been  significantly  different  than  expected  (Subroutine  RANGE), 
turn  on  the  print  (Subroutine  PRNTON). 

3.  Calculate  the  total  velocity  of  the  ions  with  respect  to  the  sensor  (VK  +  ur).  If  the  ur  use  flag  is 
zero,  use  VK  only. 

4.  If  the  filter  data  are  to  be  processed,  convert  the  voltages  from  the  wideband  amplifier  to  PSD 
estimates  (Subroutine  FILTER).  If  an  error  was  encountered,  alert  the  user  and  turn  on  the  print 
(Subroutine  PRNTON).  If  not,  set  the  SM  processing  flag  to  its  current  value  plus  2. 

5.  If  requested,  generate  diagnostic  output  (Subroutine  SMDIAG). 

6.  Return  to  Subroutine  PROCES. 

d.  Outputs. 

1.  Argument  list. 

None. 

2.  COMMON  blocks. 

SMIDEN  -  24  ion  densities  (ion/cm3) 

SMADEN  -  Average  ion  density  (ion/cm3) 

SMFPDS  -  PSD  estimates  ((ion/cm3)2/Hz) 

ISMEF  -  SM  processing  error  flag 

ISMAR  -  SM  analysis  results  flag 

e.  Associated  subroutines. 

1.  Subroutine  RANGE.  Process  the  SM  range  data  (see  2.4.4.1.1). 

2.  Subroutine  ELAMP.  Process  SM  electrometer/amplifier  data  (see  2.4.4.1.3). 

3.  Subroutine  FILTER.  Process  SM  filter  data  (see  2.4.4. 1.5). 

4.  Subroutine  SMDIAG.  Generate  diagnostic  output  (see  2.4.4. 1.6). 

5.  Subroutine  PRNTON.  Set  a  flag  to  disable  the  runstream  PRINTAWAY  (see  2.4.8.11). 

6.  Function  BITON.  Determine  if  a  particular  bit  is  set  in  a  word  (see  2.4.8.2). 
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f.  Interfaces. 


1.  Called  by  Subroutine  PROCESS. 

2.  Uses  COMMON  blocks  D FRAME,  LUDIAG,  RPAANL,  SATEPH,  SMANL,  and  SMCON. 


2.4.4.1.1  Subroutine  RANGE. 


a.  Function. 


Convert  the  SM  range  data  word  (RELWB1)  to  the  ranges  on  the  SM  electrometer  and  wideband 
amplifiers. 


b.  Inputs. 

1.  Argument  list. 

RESET 

IQFRME 

RELWBI 

VTABLE 

MONDSM 


New  satellite/REV  reset  flag  (logical) 
Data  frame  quality  flag 
Range  data  (volts) 

Range  data  table  (volts) 

DSM  command  monitor 


c.  Processing. 

1.  Reset  last  settings  as  necessary,  and  return  to  Subroutine  SMPRC  if  the  current  data  frame  is  bad. 

2.  Determine  if  the  wideband  amplifier  has  been  commanded  to  a  new  operating  mode  (Subroutine 
SMCMD). 

3.  Determine  the  wideband  amplifier  range  setting  by  searching  the  range  table. 

4.  Determine  the  electrometer  range  setting  by  searching  the  section  of  the  range  table  which 
corresponds  to  the  wideband  amplifier  setting. 

(a)  If  a  fit  is  found,  set  the  electrometer  and  wideband  amplifier  ranges. 

(b)  If  not,  set  the  electrometer  range  parameter  to  zero  and  increment  the  error  parameter. 

(c)  If  the  fit  error  counter  exceeds  100,  alert  the  user  and  set  the  error  flag  to  2. 

5.  Return  to  Subroutine  SMPRC. 


d.  Outputs. 

1.  Argument  list. 

IELR 

IWBR 

NEWRNG 

NEWCMR 


Electrometer  range  bin  (1-5) 

Wideband  amplifier  range  bin  (1-5) 

New  range  flag  (either  amplifier) 

New  SM  command  lag  (range  changes  only) 


» 


if 
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IERR 


Error  flag 

0:  No  errors 

1:  No  range  fit  found 

2:  Range  data  too  far  from  nominal  values 


e.  Associated  subroutines. 

1.  Subroutine  SMCMD.  Process  an  SM  command  (see  2.4.4.1.2). 

f.  Interfaces. 

1.  Called  by  Subroutine  SMPRC. 

2.  Uses  no  COMMON  blocks. 


2.4.4.1.2  Subroutine  SMCMD. 

a.  Function. 

Determine  if  the  SM  wideband  amplifier  has  been  commanded  into  a  new  operating  mode. 

NOTE:  SMCMD  processing  is  specific  to  IES,  IES2  and  IES2A  only.  When  IES3  comes  on  line, 
SMCMD  may  need  to  be  modified  to  handle  IES3  DSM  commands. 


b.  Inputs. 


1.  Argument  list. 


RESET 
IESTYP  - 

MONDSM  - 


New  satellite/REV  reset  flag  (logical) 

IES  instrument  ID  code: 

1  =  IES,  2=IES2,  3=IES2A,  4=IES3 
DSM  command  monitor 


2.  COMMON  blocks. 


/RGSTAT/ 

ISTSTA  -  Subcom  processing  status 

IW1STA  -  WIBAN1  Range  status 


c.  Processing. 

1.  If  RESET  is  .TRUE.,  set  the  last  command  value  to  -1. 

2.  If  the  DSM  command  matches  the  previous  one,  set  the  new  command  flag  (NEWCMR)  to 
.FALSE,  and  return  to  Subroutine  RANGE. 

3.  If  this  is  a  new  command  and: 

(a)  this  an  IES  data  configuration,  check  the  command  for  validity. 
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(b)  this  is  an  IES2  or  IES2A  data  configuration,  check  the  command  for  validity.  If  the  command 
is  not  valid,  try  to  obtain  the  command  from  the  subcom  status. 

4.  If  the  command  was  valid,  set  NEWCMR  to  .TRUE..  Otherwise,  set  NEWCMR  to  .FALSE. 

5.  Return  to  Subroutine  RANGE. 

d.  Outputs. 

1.  Argument  list. 

NEWCMR  -  New  command  flag  (logical): 

.TRUE.:  The  range  was  reset 
.FALSE.:  The  range  was  not  reset 

e.  Associated  subroutines. 

None. 

f.  Interfaces. 

1.  Called  by  Subroutine  RANGE. 

2.  Uses  no  COMMON  blocks. 


2.4.4. 1.3  Subroutine  ELAMP. 

a.  Function. 

Convert  24  EL/AMP  voltage  samples  from  the  SM  sensor  to  estimates  of  ion  density.  NOTE: 
This  is  a  very  complicated  and,  consequently,  very  touchy,  subroutine.  DO  NOT  make  any 
changes  to  this  routine  until  you  completely  understand  the  description  of  the  processing 
algorithm  for  the  SM  EL/AMP  data  in  Appendix  B.4  and  in  reference  1.2.3d,  and  completely 
understand  the  data  flow  in  this  routine. 

b.  Inputs. 

1.  Argument  list. 


RESET 

New  satellite/REV  reset  flag 

IQFRME  - 

Data  frame  quality  flag 

SMV 

24  SM  EL/AMP  voltages 

VTCON  - 

Constant  equal  to  SMAEFF  x  VTOT  x  10‘ 

SMEG 

Electrometer  (EL)  gain 

SMAG 

Difference  amplifier  (AMP)  gain 

SMAOFF  - 

Difference  amplifier  offset  (volts) 

IRDELR  - 

EL  range  bin  (1-5)  from  range  data 

ETABLE  - 

Imbedded  range  flag  data  table  (volts) 
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c.  Processing. 


1.  If  required,  reset  internal  control  parameters. 

2.  If  the  current  data  frame  is  bad,  place  processing  into  a  wait  status,  reset  internal  control 
parameters,  and  return  to  Subroutine  SMPRC. 

3.  If  in  a  wait  status,  check  for  a  valid  5.11  EL-to-AMP  flag  in  the  current  set  of  voltages  (Function 
FND511).  If  none  is  found,  remain  in  wait  status.  If  the  last  EL  range  setting  from  the  range 
data  word  is  valid  (IRDELR),  use  it  to  set  the  EL  range  gain.  If  not,  remain  in  wait  status. 

4.  If  in  wait  status,  return  to  Subroutine  SMPRC. 

5.  Initialize  processing-loop  control  parameters. 

6.  Start  main  processing  loop. 

7.  Set  variables  LOW  and  HIGH  to  flag  if  the  current  voltage  is  below  0.32  or  above  5.10  volts, 
respectively. 

8.  If  the  voltage  is  neither  low  nor  high,  or  if  the  low  density  flag  is  set  (LOWDEN),  calculate  an  ion 
density  from  the  current  voltage  value  as  follows: 

(a)  If  in  AMP  mode,  then 

(1)  If  a  valid  base  density  from  the  last  EL  measurement  is  not  available,  go  into  wait 
status  and  jump  to  step  13. 

(2)  Calculate  a  delta-current  from  the  latest  voltage,  use  it  to  calculate  a  delta- 
density,  and  calculate  the  total  ion  density  by  adding  the  delta-density  to  the  base 
density  from  the  last  EL  measurement. 

(b)  If  in  EL  mode,  calculate  the  current  from  the  latest  voltage  and  calculate  the  total  ion 
density  from  this  current. 

(c)  In  either  mode,  if  the  calculated  density  is  within  allowed  limits,  load  the  density  in  the 
output  density  array  and  add  it  to  the  density  sum  to  be  used  in  calculating  the  average 
density  for  the  current  one-second  period.  If  in  EL  mode,  save  the  density  and  voltage  for 
future  processing  of  AMP  data.  Reset  the  low  density  flag  to  .FALSE.. 

9.  If  the  voltage  is  high,  it  may  be  an  EL-to-AMP  flag.  Process  as  follows: 

(a)  If  in  AMP  mode,  and  there  is  no  break  between  the  last  good  data  frame  and  the  current 
one,  something  is  wrong.  Place  processing  in  a  wait  status  and  jump  to  step  13. 

(b)  If  in  EL  mode,  and  if  the  current  voltage  is  not  in  word  1,  2,  or  5  of  the  24-point  voltage 
set,  place  processing  in  a  wait  status  and  jump  to  step  13.  Otherwise,  set  the  AMP  flag  to 
.TRUE.. 

10.  If  the  voltage  is  low,  it  may  be  either  an  AMP-to-EL  flag  with  or  without  an  EL  range  change,  an 
EL  range  change,  or  a  density  data  point  if  EL  is  in  range  1.  Process  as  follows: 
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(a)  Calculate  a  range  setting  (NEWELR)  from  the  voltage  using  the  range  table  for  imbedded 
range  flags  (ETABLE). 

(b)  If  in  EL  mode,  then 

(1)  If  the  EL  range  setting  was  1,  this  may  be  a  data  point  rather  than  a  flag.  If  the 
new  setting  is  2,  and 

(i)  the  current  voltage  is  prior  to  the  range  data  measurement  time  (i.e., 
is  prior  to  data  point  #10)  and  the  range  data  EL  setting  agrees  that  the 
setting  is  2, 

or 

(ii)  the  voltage  value  in  ELSAVE  is  above  0.75  volts, 

this  is  a  range  change  flag.  If  the  new  setting  is  not  2,  set  the  low  density  flag  and 
jump  back  to  step  8.  If  this  was  neither  a  low  density  point  nor  a  range  change, 
place  processing  in  a  wait  status. 

(2)  If  the  EL  range  setting  was  2,  then  a  check  must  be  made  to  differentiate  between 
a  valid  change  to  range  1  and  a  density  data  point  in  the  range  0.30-0.32  volts.  If 
the  new  range  is  2  or  greater  than  3,  place  processing  in  a  wait  status.  If  the  new 
range  is  1  and  the  voltage  is  greater  than,  or  equal  to,  0.30  volts,  this  is  a  range 
change  if  either 

(i)  the  current  voltage  is  prior  to  the  range  data  measurement  time  (i.e., 
is  prior  to  data  point  #10)  and  the  range  data  EL  setting  agrees  that  the 
setting  is  1, 

or 

(ii)  the  voltage  value  in  ELSAVE  is  above  0.75  volts. 

If  not,  this  is  a  density  data  point;  set  the  low  density  flag  and  jump  back  to  step 

8. 

(3)  If  the  last  range  setting  was  greater  than  2,  and  the  current  voltage  is  greater  than, 
or  equal  to,  0.30,  this  is  a  density  data  point.  Set  the  low  density  flag  and  jump 
back  to  step  8. 

(4)  If  the  new  range  setting  is  5,  and  the  range  data  EL  range  indicates  the  setting  is 
below  4,  place  processing  in  wait  status. 

(c)  If  in  AMP  mode,  then 

(1)  If  no  valid  range  setting  was  found  in  step  10a,  and  the  current  voltage  is  above 
the  lowest  voltage  in  the  imbedded-flag  look-up  table,  place  processing  in  wait 
status. 

(2)  If  this  is  an  IES2  or  IES2A  configuration  and  this  is  the  last  sample,  and  a  switch 
from  AMP  to  EL  mode  occurred  on  the  16th  sample,  place  processing  in  wait 
status. 

(3)  If  the  new  range  is  5,  then  a  check  must  be  made  to  differentiate  between  a  range 
change  and  an  AMP-to-EL  flag  with  no  range  change.  If  the  last  range  setting 
was  not  4,  assume  that  this  is  really  a  no-change  flag.  If  the  last  range  setting  was 

4,  and  the  current  voltage  is  prior  to  the  range  data  measurement  time  (i.e.,  is 
prior  to  data  point  #10)  and  the  range  data  EL  setting  agrees  that  the  setting  is 

5,  this  was  a  valid  range  change  from  4  to  5.  If  not,  place  processing  in  wait 
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status. 


(d)  If  any  of  the  above  checks  have  placed  processing  in  wait  status,  jump  to  step  13. 

(e)  If  the  range  setting  is  non-zero,  calculate  a  new  EL  range  gain  and  save  the  new  range 
setting. 

(f)  Set  the  AMP  flag  to  .FALSE.,  reset  the  base  density  and  EL  voltage  variables,  and 
increment  the  voltage-array  index  by  1  to  skip  over  the  next  voltage  (which  should  be  a 
second  AMP-to-EL  or  range  change  flag). 

11.  If  this  is  data  point  10  in  IES  configuration,  or  data  point  6  in  IES2  or  IES2A  configuration,  the 
range  setting  obtained  from  imbedded  flags  should  agree  with  the  setting  from  the  range  data 
word.  If  not,  alert  the  user,  place  processing  in  wait  status,  and  jump  to  step  13. 

12.  Increment  the  voltage  array  index.  If  it  is  less  than  25,  jump  back  to  the  start  of  the  processing 
loop  (step  6)  and  process  the  next  voltage. 

13.  END  OF  MAIN  PROCESSING  LOOP. 

14.  If  not  in  wait  status,  set  the  starting  value  of  the  voltage-array  index  for  the  next  one-second  data 
set  and  calculate  the  average  density  for  the  present  one-second  data  set.  If  in  wait  status,  reset  all 
control  parameters. 

15.  If  processing  was  suspended  during  this  data  set,  increment  the  appropriate  counter  and  alert  the 
user. 

16.  Return  to  Subroutine  SMPRC. 


d.  Outputs. 

1.  Argument  list. 


IVDELR 

SMIDEN 

SMADEN 


EL  range  bin  (1-5)  from  imbedded  flags 
24  ion  density  measurements(ion/cm3) 
Average  ion  density  (ion/cm3) 


e.  Associated  subroutines. 


None. 

1.  Function  PRMRNG.  Check  the  range  of  the  density  measurements  calculated  (see  2.4.8.10). 

2.  Function  FND511.  Find  a  valid  5.11  volt  flag. 


f.  Interfaces. 


1.  Called  from  Subroutine  SMPRC. 

2.  Uses  no  COMMON  blocks. 
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2.4.4.1.4  Function  FND511. 


a.  Function. 

Determine  if  a  5. 11 -volt  flag  is  located  at  word  #1  or  word  #5  in  a  24-point  array  of  SM  EL- AMP 
data. 

b.  Inputs. 

1.  Argument  list. 

AMV  -  SM  EL-AMP  voltages  (24) 

ELSAVE  -  Last  good  EL  voltage 

c.  Processing. 

1.  Search  through  the  voltage  array  for  a  5.11-volt  flag.  Set  variable  1511  to  the  location  in  array 
SMV  if  one  is  found. 

2.  If  a  flag  was  found  in  word  #1  and  ELSAVE  contains  a  valid  voltage,  set  word  #1  to  the  value  in 
ELSAVE,  set  word  #2  to  5.11,  set  the  start-processing  index  to  1,  and  set  FND511  to  .TRUE..  If 
ELSAVE  is  not  valid,  save  the  last  voltage  in  the  array  in  ELSAVE  and  set  FND511  to  .FALSE.. 

3.  If  a  flag  was  found  in  word  #5,  set  the  start-processing  flag  to  4  and  set  FND511  to  .TRUE.. 

4.  If  flags  were  not  found  in  words  1  or  5,  save  the  last  voltage  in  array  SMV  in  ELSAVE  and  set 
FND511  to  .FALSE.. 

5.  Return  to  Subroutine  ELAMP. 

d.  Outputs. 

1.  Function  value. 

FND511  -  .TRUE,  if  a  valid  EL-to-AMP  flag  was  found 

2.  Argument  list. 

ELSAVE  -  Set  to  last  good  EL  voltage  in  SMV 

ISTART  -  Start-of-processing  index  (1  or  4) 

e.  Associated  subroutines. 

None. 

f.  Interfaces. 

1.  Invoked  by  Subroutine  ELAMP. 

2.  Uses  no  COMMON  blocks. 
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2.4.4.1.5  Subroutine  FILTER. 


a.  Function. 

Convert  the  SM  filter  bank  voltages  to  estimates  of  Nj  power  spectral  density  (PSD). 

b.  Inputs. 

1.  Argument  list. 

SMFLT  -  SM  filter  bank  voltages  (volts) 

NSMFLT  -  Number  of  SM  filter  bank  voltages 

(normally  9  for  IES;  6  for  IES2  &  1ES2A) 

VTCON  -  Constant  equal  to  SMAEFF  x  VTOT  x  106 

SMFG  -  SM  filter  amplifier  system  effective  gain 

SMFOFF  -  SM  filter  amplifier  offsets  (volts) 

SMFBW  -  SM  filter  amplifier  bandwidths  (hertz) 

IRDELR  -  Wideband  amplifier  range  bin  (1-5) 

NOFILT  -  SM  filter  data  use  flag  (LOGICAL) 

c.  Processing. 

1.  If  the  data  are  to  be  processed,  then  convert  each  of  the  filter  readings  for  which  the  bandwidth  is 
non-zero  to  PSD  estimates  as  follows: 

(a)  Calculate  the  RMS  variance  (RMSDI)  in  the  current  from  the  filter  voltage. 

(b)  Convert  this  to  an  RMS  variance  in  density  (RMSDNE). 

(c)  Convert  this  to  an  estimate  of  the  PSD  (RMSPDS). 

2.  Return  to  Subroutine  SMPRC. 

d.  Outputs. 

1.  Argument  list. 

SMFPDS  -  estimates  of  N,  power  spectral  density 

e.  Associated  subroutines. 

None. 

f.  Interfaces. 

1.  Called  from  Subroutine  SMPRC. 

2.  Uses  no  COMMON  blocks. 
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2.4.4.1.6  Subroutine  SMDIAG. 


a.  Function. 

Construct  diagnostic  output  files  for  the  SM  data  processing  module. 

* 

b.  Inputs. 

1.  Argument  list. 

RESET 

New  satellite/REV  flag 

IRDELR  - 

Electrometer  amplifier  range  bin  (1-5) 

IWBR 

Wideband  amplifier  range  bin  (1-5) 

IDIAG 

2.  COMMON  blocks. 

Diagnostic  output  file: 

0:  No  output 

1:  Binary  diagnostic  output  only 

2:  ASCII  diagnostic  output  only 

3:  Both  ASCII  and  binary  output 

/DFRAME/ 

IDTIME  - 

Data  frame  time  (seconds  since  midnight) 

IQFRME  - 

Data  frame  quality  flag 

MONDSM  - 

DSM  command  monitor 

SMFLT 

SM  filter  bank  voltages 

RELWB1  - 

SM  range  data 

SMV 

SM  EL/AMP  voltages 

/LUDIAG/ 

LUSMA  - 

Logical  unit  for  ASCII  output 

LUSMB  - 

Logical  unit  for  binary  output 

/PROCON/ 

IFLT 

Satellite  flight  ID 

/SMANL/ 

SMIDEN  - 

Ion  density  (24,  ion/cm3) 

SMADEN  - 

Average  ion  density  (ion/cm3) 

SMFPDS  - 

Irregularity  PDS  estimates  (9)  ((ion/cm3)2/Hz) 

ISMEF 

SM  analysis  error  flag 

ISMAR 

SM  analysis  results  flag 

A 

/SMCON/ 

SMEG 

Electrometer  amplifier  gain 

SMAG 

Difference  amplifier  gain 

SMAOFF  - 

Difference  amplifier  offset  (volts) 
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SMRFIT  - 

Fit  criterion  for  range  data  (volts) 

VTABLE  - 

Range  table  (volts) 

SMFG 

Filter  amplifier  gain 

SMFOFF  - 

Filter  offsets  (volts) 

SMFFRQ  - 

Filter  bank  center  frequencies  (Hz) 

SMFBW  - 

Filter  bank  bandwidths  (Hz) 

NSMFLT  - 

Number  of  filters  in  filter  bank 

ISMUR 

RPA  ram  drift  velocity  use  flag 

c.  Processing. 

1.  On  first  call  to  this  routine,  open  the  necessary  ASCII  and/or  binary  output  files  (Subroutine 
OPNDOF). 

2.  If  neither  file  could  be  opened,  set  the  diagnostic  print  flag  to  zero  (disabling  the  diagnostic 
output)  and  return  to  Subroutine  SMPRC. 

3.  If  an  ASCII  output  file  is  requested,  then 

(a)  If  a  RESET=.TRUE.  call,  output  the  sensor  processing  constants  and  processing  control 
information  for  the  SM  module. 

(b)  If  the  data  frame  was  good,  write  out  all  data  input  and  produced  in  the  current  invocation  of 
the  SM  processor.  (Note:  If  the  frame  was  bad,  write  out  a  note  to  that  effect). 

4.  If  a  binary  output  file  is  requested  and  if  the  frame  was  good,  write  the  diagnostic  output  buffer  to 
the  output  file. 

5.  Return  to  Subroutine  SMPRC. 

d.  Outputs. 

IESSMPRT.  ASCII  diagnostic  output  file  (see  Section  4.4.5). 

IESSMDIAG.  Binary  diagnostic  output  file  (see  Section  4.4.5). 

e.  Associated  subroutines. 

1.  Subroutine  OPNDOF.  Open  diagnostic  output  files  (see  2.4.8.9). 

2.  Subroutine  FILERR.  File  error  handling  routine  (see  2.4.8.5). 

f.  Interfaces. 

1.  Called  from  Subroutine  SMPRC. 

2.  Uses  COMMON  blocks  D FRAME,  LUDIAG,  PROCON,  SMANL,  and  SMCON. 
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2A.4.2  Subroutine  EPPRC. 


a.  Function. 


Control  the  processing  of  Electron  Probe  (EP)  data.  Convert  currents  and  voltages  from  the  EP 
into  the  environmental  parameters  electron  density,  electron  temperature,  and  satellite  potential. 
Figure  9  is  a  hierarchy  chart  for  this  module. 


EPPRC: 

.  SWPCOL: 

.  .  COPY: 

.  EPSWP: 

.  .  COPY: 

.  .  EPDIAG: 

.  .  .  OPNDOF: 
....  BITON: 
....  FILERR: 

.  .  .  .  PRNTON: 
.  . .  LOGLIN: 

.  .  .  FILERR: 

.  .  FITLIN: 

.  .  NTRP: 

.  .  PRMRNG: 

.  SELNRM: 

.  EPDC: 

.  .  PRMRNG: 


process  electron  probe  (EP)  data 

accumulate  data  for  a  complete  sweep  analysis 

initialize  array  or  transfer  values  between  arrays 

process  EP  sweep  data  for  density,  temperature,  and  potential 

initialize  array  or  transfer  values  between  arrays 

report  EP  processing  diagnostics 

initialize  diagnostic  output  file 

test  for  bit  setting 

determine  and  report  file  error  status 

set  PRINTAWAY  status  for  conclusion  of  processing 

transform  tabulated  values  between  standard  and  loglO  form 

determine  and  report  file  error  status 

perform  linear  least-squares  fit  for  tabulated  values 

perform  two-point  interpolation 

check  environment  parameters  against  allowed  ranges 

select  normalization  density  or  temperature  for  EP  DC  analysis 

process  EP  DC  (dwell)  data  for  electron  density 

check  environment  parameters  against  allowed  ranges 


Figure  9  EPPRC  module  hierarchy  chart 


b.  Inputs. 


Argument  list. 

NEWSAT  - 

New  satellite  flag 

NEWREV  - 

New  readout  REV  flag 

GRESET  - 

General  reset  flag 

THEEND  - 

End  of  data  flag 

IDOEP 

EP  data  processing  flag 

IEPDGP  - 

0:  Do  not  process 
si:  Process  all  data 

Diagnostic  output  flag 

COMMON  blocks. 

0:  No  diagnostic  output 

1:  Generate  binary  diagnostic  file 

2:  Generate  ASCII  diagnostic  file 

3:  Generate  both  binary  and  ASCII 

/D  FRAME/ 

EPC 

EP  currents  for  this  data  frame 
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ICALIB 
ICCNTR  - 
IDTIME  - 
IQFRME  - 
MODEP  - 
VBIAS 

Calibration  sweep  identifier  flag 

EP  instrument  cycle  counter 

Time  of  this  data  frame  (seconds  since  midnight  GMT) 
Data  frame  quality  flag 

EP  mode  flag 

Instrument  bias  voltage 

/EPCON/ 

EPAREA  - 
EPCVIP  - 
IPDTMP  - 
EPNVDN  - 
EPNVUP  - 

EP  collector  area 

EP  calibration  sweep  start  test  voltage 

Default  electron  temperature  for  density  calculations 

EP  normal  down  sweep  start  test  voltage 

EP  normal  up  sweep  start  test  voltage 

/EPANL/ 

IEPAR 

EP  analysis  result  flag 

/CONSTS/ 

E 

K 

ME 

Electron  charge 

Boltzmann’s  constant 

Mass  of  an  electron 

/PIDEG/ 

PI 

it 

3.  Files. 

None 

c.  Processing. 

1.  If  end  of  data  flag  (THEEND)  is  .TRUE.,  return  to  Subroutine  PROCES. 

2.  If  first  pass  (FIRST),  or  reset  (GRESET),  or  new  satellite  (NEWSAT),  or  new  readout 
(NEWREV),  then  reset  the  necessary  flags  and  counters. 

2.  If  these  data  are  from  Mode  BS  or  Mode  DS  and  the  calibration  flag  (ICAL1B)  is  set,  terminate 
any  ongoing  sweep. 

3.  If  the  previous  sweep  is  finished  and  this  is  a  good  data  frame: 

(a)  Skip  the  one  second  of  data  after  each  calibration  sweep.  (Calibration  sweeps  are  three 
seconds  duration.)  This  is  cycle  counter  4  and  8. 

(b)  If  conditions  are  right  for  the  start  of  a  calibration  sweep,  set  the  collection  variables  to 
initiate  the  sweep  collection. 

(c)  Otherwise,  if  the  conditions  are  right  for  the  start  of  a  normal  sweep,  set  the  collection 
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variables  to  initiate  the  sweep  collection. 


(d)  Otherwise,  if  we  are  in  Mode  C  or  D  and  the  conditions  are  right  for  the  start  of  a  DC  mode 
4  second  up  sweep,  or  the  28  second  dwell,  set  the  collection  variables  to  initiate  the  sweep  or 
dwell  collection. 

(e)  Otherwise,  if  we  are  in  Mode  E  and  the  conditions  are  right  for  the  start  of  a  short  (2  second) 
sweep,  set  the  collection  variables  to  initiate  short  sweep  collection. 

4.  If  the  sweep  type  is  not  a  28  second  dwell  then: 

(a)  If  the  sweep  status  is  new  or  ongoing,  invoke  Subroutine  SWPCOL  to  collect  this  second’s 
worth  of  data  for  the  sweep. 

(b)  If  the  sweep  collection  is  complete,  set  the  EP  analysis  results  time  and  invoke  Subroutine 
EPSWP  to  process  the  sweep. 

(c)  If  the  completed  sweep  was  a  DC  Mode  4  second  sweep,  invoke  Subroutine  SELNRM  to  get 
the  normalization  density  and/or  electron  temperature  to  use  in  DC  mode  density  calculations. 

5.  Otherwise,  the  collection  is  a  28  second  dwell,  so  invoke  Subroutine  EPDC  to  calculate  the 
electron  densities. 

d.  Outputs. 

1.  Argument  list. 

None. 

2.  COMMON  blocks. 

/EPANL/ 

IEPTIM  -  EP  analysis  result  time 

3.  Files. 

None. 

e.  Associated  subroutines. 

1.  Subroutine  SWPCOL.  Collects  the  sweep  data  (See  2.4.4.2.1). 

2.  Subroutine  EPSWP.  Process  an  EP  sweep  (See  2.4.4.2.2). 

3.  Subroutine  SELNRM.  Select  normalization  sensor  for  DC  mode  and  set  normalization 
parameters  (See  2.4.4.2.5). 

4.  Subroutine  EPDC.  Process  EP  DC  mode  data  (See  2.4.4.2.6). 
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f.  Interfaces. 


1.  Called  from  Subroutine  PROCES. 

2.  Uses  COMMON  blocks  D FRAME,  EPCON,  EPANL,  CONSTS,  and  PIDEG. 


2.4.4.2.1  Subroutine  SWPCOL. 


a.  Function. 


Collect  successive  data  frames  to  build  a  complete  EP  or  RPA  sweep. 


b.  Inputs. 

1.  Argument  list. 

ICCNTR 

SWPCUR 

SSCEC 

ISEORR 

ISTAT 

ISWTYP 

ISWDIR 


Data  cycle  counter 

EP  or  RPA  raw  data  frame  currents 

RPA  sensor  sweep  coupling  error  correction  factor 

EP  or  RPA  sweep  indicator  (0=EP,  9=RPA) 

Sweep  status 

Sweep  type 

Sweep  direction 


2.  COMMON  blocks. 


/SWPVLT/ 

SWPVLT  -  Array  of  ’ideal’  sweep  voltages. 

3.  Files. 


None. 


c.  Processing. 

1.  If  current  data  frame  is  the  start  of  a  new  sweep,  save  the  instrument  type  and  the  sweep  type  and 
direction  variables,  initialize  the  sweep  collection  current  and  voltage  arrays  to  zero,  and  tag  the 
sweep  as  ongoing. 

2.  Otherwise,  if  we  have  missed  a  data  cycle  or  changed  instruments  since  the  last  cycle,  terminate 
the  ongoing  sweep. 

3.  If  these  data  are  part  of  an  ongoing  sweep,  update  the  indices  for  sweep  direction,  sweep  type,  and 
sweep  time,  and  store  the  current  data  into  the  sweep.  If  these  data  are  for  the  RPA,  convert 
them  to  linear  values  (from  loglO)  and  apply  the  sensor  correction  factor. 

4.  Update  the  counters  and  indices  for  the  next  second  of  data. 

5.  If  the  sweep  is  complete,  set  the  sweep  status  to  done  and  reconstruct  the  missing  25th  sample 
from  each  second  by  simple  linear  interpolation. 


67 


6.  Return  to  the  invoking  subroutine. 


d.  Outputs. 

1.  Argument  list. 

CL  -  Complete  sweep  current  array: 

LoglO  for  EP,  Linear  for  RPA 
NVALS  -  Number  of  values  collected  in  sweep 

V  -  Complete  sweep  voltage  array 

2.  COMMON  blocks. 

None. 

3.  Files. 

None. 

e.  Associated  subroutines. 

Subroutine  COPY.  Copies  one  array  to  another,  or  a  scalar  into  specified  elements  of  an  array, 
(see  2.4.8.3) 

f.  Interfaces. 

1.  Called  from  EPSWP  and  RPASWP. 

2.  Uses  no  COMMON  blocks. 


2.4.4.2.2  Subroutine  EPSWP. 


a.  Function. 


Process  the  current  vs.  voltage  data  provided  by  the  Electron  Probe.  Successful  analysis  will  result 
in  determination  of  electron  density,  electron  temperature,  and  satellite  potential. 


b.  Inputs. 

1.  Argument  list. 
CL 

IEPDGP 


NUM 

V 

VBIAS 


Sweep  current  array 
Diagnostic  output  switch 

0:  No  diagnostic  output 
1:  Generate  binary  diagnostic  file 
2:  Generate  ASCII  diagnostic  file 
3:  Generate  both  binary  and  ASCII  diagnostic  files 
Number  of  points  in  sweep 
Sweep  voltage  array 
Instrument  bias  voltage 
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COMMON  blocks. 

/EPCON/ 

EPAREA  - 

EP  collector  area 

EPCCC1  - 

Intersection  point  correction  coefficient  1 

EPCCC2  - 

Intersection  point  correction  coefficient  2 

EPCCC3  - 

Intersection  point  correction  coefficient  3 

EPCRNG  - 

Required  current  range  to  make  a  sweep  analysis 

EPMDEL  - 

Change  in  log  current  allowable  near  sweep  start 

EPNSDN  - 

Acceptable  noise  level  decrease  in  current 

EPNSUP  - 

Acceptable  noise  level  increase  in  current 

EPTPAR  - 

Temperature  calculation  constant 

EPTRAN  - 

EP  instrument  transparency 

IEPCOR  - 

Make  plasma  potential  estimation  correction  flag 

IEPMIN  - 

Minimum  number  of  points  allowed  for  sweep  analysis 

/CONSTS/ 

E 

Electron  charge 

K 

Boltzmann’s  constant 

ME 

Mass  of  an  electron 

/PIDEG/ 

PI 

3.  Files. 

None. 

c.  Processing. 

1.  Initialize  variables  as  necessary. 

2.  Find  valid  sweep  starting  point. 

3.  Clean  up  the  sweep.  Successive  points  within  the  sweep  must  be  within  expected  noise  limits  of 
each  other. 

4.  Locate  the  minimum  sweep  current.  Test  the  sweep  range  against  the  criteria  required  to  perform 
the  analysis. 

5.  Fit  a  straight  line  to  the  saturation  region  currents  and  test  them  for  true  linearity. 

6.  Locate  the  point  where  the  sweep  curve  first  reaches  its  maximum  slope  by  fitting  a  straight  line 
to  a  specified  number  of  consecutive  points. 

7.  Locate  the  intersection  of  the  lines  found  in  steps  5  and  6. 

8.  If  requested,  apply  a  correction  term  based  upon  a  parametric  analysis  of  the  offset  of  the 
intersection  from  the  true  point  of  interest  specified  in  step  6. 
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9.  Calculate  the  required  environmental  parameters. 


d.  Outputs. 

1.  Argument  list. 

CVB  -  Sweep  current  at  the  point  of  the  sensor  potential 

2.  COMMON  blocks. 

/EPANL/ 

EPEDEN  -  EP  electron  density 

EPETMP  -  EP  electron  temperature 

IEPAR  -  EP  analysis  result  flag 

NEPSG  -  Number  of  good  sweep  analyses  this  readout 

NEPST  -  Number  of  sweeps  attempted  this  readout 

3.  Files. 

None. 

e.  Associated  subroutines. 

1.  Subroutine  EPDIAG.  Provides  diagnostic  information  for  the  user  (see  2.4.4.23). 

2.  Subroutine  NTRP.  Performs  a  two-point  interpolation  from  a  table  of  function  arguments  and 
values  (see  2.4.4.2.4). 

f.  Interfaces. 

1.  Called  from  Subroutine  EPPRC. 

2.  Uses  COMMON  blocks  EPCON,  EPANL,  CONSTS,  and  PIDEG. 

2.4.4.23  Subroutine  EPDIAG. 

a.  Function. 

Provide  diagnostic  messages  to  the  user  concerning  problems  encountered  during  EP  data 
processing.  Additionally,  provide  a  copy  of  the  raw  EP  sweep  for  further  diagnostic  study  at  a 
later  time. 

b.  Inputs. 

1.  Argument  list. 

VOLT  -  EP  raw  sweep  voltage  array 

CURR  -  EP  raw  sweep  current  array 

MSG  -  Diagnostic  message  number 
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IDIAG  -  EP  diagnostic  output  flag 

0:  No  diagnostic  output 

1:  Generate  binary  diagnostic  file 

2:  Generate  ASCII  diagnostic  file 

3:  Generate  both  binary  and  ASCII  diagnostic  files 


2. 

COMMON  blocks. 

/D  FRAME/ 

IDTIME  - 

Data  frame  time  (seconds  since  midnight  GMT) 

IQFRME  - 

Data  frame  quality  flag 

MODEP  - 

EP  mode  flag 

VBIAS 

Instrument  bias  voltage 

/LUDIAG/ 

LUEPA  - 

Logical  file  number  for  EP  ASCII  diagnostic  file 

LUEPB 

Logical  file  number  for  EP  binary  file 

/PROCON/ 

IFLT 

Vehicle  flight  number 

/EPANL/ 

EPEDEN  - 

EP  electron  density 

EPETMP  - 

EP  electron  temperature 

IEPTIM 

EP  sweep  time  (seconds  since  midnight  GMT) 

EPVPOT  - 

EP  sensor  potential 

3. 

Files. 

None. 

Processing. 

1. 

The  design  is  for  a  short,  single  line,  diagnostic  concerning  any  problem  encountered  in  the  sweep 
analysis  so  that  any  trends  or  repetitive  data  problems  can  be  isolated. 

2. 

On  first  call,  open  the  requested  diagnostic  files.  The  binary  file  will  contain  the  raw  EP  sweep 
and  any  analysis  accomplished  by  this  processor.  The  ASCII  file  will  contain  any  diagnostic 
messages  relating  to  the  processor  analysis. 

d.  Outputs. 

1.  Argument  list. 
None. 
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2.  COMMON  blocks. 


None. 

3.  Files. 

Diagnostic  print  to  files  IESEPPRT  and  IESEPDIAG. 

e.  Associated  subroutines. 

None. 

f.  Interfaces. 

1.  Called  from  EPSWP. 

2.  Uses  COMMON  blocks  DFRAME,  LUDIAG,  PROCON,  EPANL,  and  EPCON. 

2.4.4.2.4  Subroutine  NTRP. 

a.  Function. 

Perform  a  two-point  interpolation  based  upon  a  table  of  argument  values  and  a  table  of 
corresponding  function  values. 

b.  Inputs. 

1.  Argument  list. 

N  -  Number  of  values  in  tables 

X  -  Argument  at  which  interpolated  function  value  is  desired 

XTAB  -  Table  of  argument  values 

YTAB  -  Table  of  function  values 

2.  COMMON  blocks. 

None. 

3.  Files. 

None. 

c.  Processing. 

1.  Locate  the  interpolation  boundaries. 

2.  Perform  the  linear  interpolation. 
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d.  Outputs. 


1.  Argument  list. 

Y  -  Interpolated  function  value  for  specified  argument  value 

2.  COMMON  blocks. 

None. 

3.  Files. 

None. 

e.  Associated  subroutines. 

None. 

f.  Interfaces. 

1.  Called  from  Subroutine  EPSWP. 

2.  Uses  no  COMMON  blocks. 


2.4.4.2.5  Subroutine  SELNRM. 


a.  Function. 

Select  the  normalization  density  and/or  electron  temperature  to  use  in  DC  mode  density 
calculations. 

b.  Inputs. 

1.  Argument  list. 

CVB  -  Current  value  at  sensor  potential 

2.  COMMON  blocks. 


/EPCON/ 

EPDTMP  - 

Default  electron  temperature 

NEPDM  - 

Normalize  to  DM  density  flag 

NEPRP 

Normalize  to  RPA  density  flag 

NEPSM 

Normalize  to  SM  density  flag 

/EPANL/ 

EPEDEN  - 

EP  electron  density 

EPETMP  - 

EP  electron  temperature 

IEPAR 

EP  analysis  result  flag 
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/RPAANL/ 


IRPAR 

RPA  analysis  result  flag 

RPEDEN  - 

RPA  estimated  electron  density 

/SMANL/ 

ISMAR 

SM  analysis  result  flag 

SMADEN  - 

SM  estimated  electron  density 

/DMANL/ 

DMIDEN  - 

DM  estimated  electron  density 

IDMAR 

DM  analysis  result  flag 

3.  Files. 

None. 

c.  Processing. 

1.  Examine  the  analysis  results  flags  for  the  possible  normalizing  density  values  in  the  established 
priority  order.  The  first  instrument  which  was  selected  in  IESCNTRLFILE  as  a  possible 
normalizer  will  be  used  if  an  analysis  is  available  for  that  particular  instrument.  If  a  normalizer 
flag  could  not  be  found  set  the  NORMLZ  flag  to  false. 

2.  Select  a  temperature  to  use  in  un-normalized  density  calculations.  Use  the  EP  sweep  analysis 
temperature  if  available.  If  not  available  use  the  default  temperature  from  IESCNTRLFILE. 

d.  Outputs. 

1.  Argument  list. 

FNORM  -  Normalization  factor 

NORMLZ  -  Perform  normalization  flag 

TE  -  Electron  temperature  for  un-normalized  density  calculations 

2.  COMMON  blocks. 

None. 

3.  Files. 

None. 

e.  Associated  subroutines. 

None. 

f.  Interfaces. 

1.  Called  from  Subroutine  EPPRC. 


74 


2.  Uses  COMMON  blocks  EPCON,  EPANL,  RPAANL,  SMANL,  and  DMANL. 


2.4.4.2.6  Subroutine  EPDC. 

a.  Function. 

Calculate  electron  densities  from  the  DC  modes  (C  and  D  data). 

b.  Inputs. 

1.  Argument  list. 

EPC  -  EP  currents  for  this  data  frame 

FNORM  -  Density  normalization  factor 

TE  -  Electron  temperature  for  un-normalized  density  calculations 

CONST  -  Instrument  parameter  calculation  constant 

NORMLZ  -  Normalize  the  calculated  densities  flag 

2.  COMMON  blocks. 

None. 

3.  Files. 

None. 

c.  Processing. 

Loop  through  the  24  current  values  performing  the  necessary  calculations: 

(a)  If  we  are  to  normalize,  multiply  the  current  by  the  normalization  factor. 

(b)  If  we  are  not  normalizing,  calculate  the  density  based  upon  the  instrument  parameters  and  an 
established  electron  temperature. 

(c)  Test  the  density  value  for  appropriate  range  and  calculate  an  average  density.  Average  current 
is  calculated  for  diagnostic  purposes. 

d.  Outputs. 

1.  Argument  list. 

None. 

2.  COMMON  blocks. 

/EPANL/ 

EPADEN  -  Average  electron  density  for  this  data  frame 
EPEDEN  -  Densities  for  each  current  value 

IEPAR  -  EP  analysis  result  flag 
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3.  Files. 


None. 

e.  Associated  subroutines. 

None. 

f.  Interfaces. 

1.  Called  from  EPPRC. 

2.  Uses  COMMON  block  EPANL. 


2.4.4.3  Subroutine  RPAPRC. 

a.  Function. 

Control  the  processing  of  Retarding  Potential  Analyzer  (RPA)  sweeps.  Convert  currents  and 
voltages  from  the  RPA  into  environmental  parameters;  ion  density,  ram  direction  drift  velocity, 
and  sensor  potential.  Figure  10  is  a  hierarchy  chart  for  this  module. 

b.  Inputs. 

1.  Argument  list. 

NEWSAT  -  New  satellite  flag 

NEWREV  -  New  readout  REV  flag 

GRESET  -  General  reset  flag 

THEEND  -  End  of  data  flag 

IDORP  -  Process  RPA  data 

0:  Do  not  process 
si:  Process  all  sweeps 
IRPDGP  -  Diagnostic  output  flag 

0:  No  diagnostic  output 

1:  Generate  binary  diagnostic  file 

2:  Generate  ASCII  diagnostic  file 

3:  Generate  both  binary  and  ASCII  diagnostic  files 

2.  COMMON  blocks. 

/D  FRAME/ 

ICALIB  -  Calibration  mode  indicator  flag 

IDTIME  -  Input  data  frame  time 

IQFRME  -  Input  data  frame  quality 

RPAC  -  RPA  currents  for  this  data  frame 

VBIAS  -  Bias  voltage 

VAPER  -  Aperture  voltage  (VBIAS  +  VIP) 
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RPAPRC: 

SWPCOL: 

RPAALG: 

.  COPY: 

.  LOGLIN: 

.  CHKSWP: 

.  .  RPDIAG: 

.  .  .  OPNDOF: 
....  BITON: 
....  FILERR: 
....  PRNTON: 
.  .  .  FILERR: 

.  .  MEANSD: 

.  XPOS: 

.  .  COPY: 

.  RPDIAG: 

.  SSLOPE: 

.  .  COPY: 

.  .  FITLIN: 

.  PLASMA: 

.  .  ERF: 

.  PRMRNG: 

.  RPASWP: 

.  .  ERF: 

.  COMPAR: 

.  ANLSAV: 

.  FITLIN: 


process  retarding  potential  analyzer  (RPA)  data 

accumulate  data  for  a  complete  sweep  analysis 

process  RPA  sweep  data  for  density,  temperature,  and  potential 

initialize  array  or  transfer  values  between  arrays 

transform  tabulated  values  between  standard  and  loglO  form 

pre-process  and  validate  RPA  sweep  data 

report  RPA  processing  diagnostics 

initialize  diagnostic  output  file 

test  for  bit  setting 

determine  and  report  file  error  status 

set  PRINTAWAY  status  for  conclusion  of  processing 

determine  and  report  file  error  status 

calculate  mean  and  standard  deviation  for  list  of  values 

determine  voltages  for  specified  sweep  currents 

initialize  array  or  transfer  values  between  arrays 

report  RPA  processing  diagnostics 

find  local  minimum  in  slope  of  sweep  profile 

initialize  array  or  transfer  values  between  arrays 

perform  linear  least-squares  fit  for  tabulated  values 

determine  environmental  parameters  from  engineering  data 

error  function  for  normal  (Gaussian)  distribution 

check  environment  parameters  against  allowed  ranges 

calculate  instrument  response  to  specified  plasma  environment 

error  function  for  normal  (Gaussian)  distribution 

determine  variance  between  measured  and  theoretical  sweeps 

store  RPA  sweep  solution 

perform  linear  least-squares  fit  for  tabulated  values 


Figure  10  RPAPRC  module  hierarchy  chart 


/RPACON/ 


RPCPLG  - 
RPDSPS  - 
RPSVDN  - 
RPSVUP  - 

/SATEPH/ 

APXLAT  - 
ITCSL 

/RPAANL/ 


Sweep  current  coupling  error  correction 
Default  satellite  potential,  sunlight 
Down  sweep  start  voltage  test 
Up  sweep  start  voltage  test 


Magnetic  latitude  of  spacecraft 
Expanded  ephemeris  time  information 


IRPAR  -  RPA  analysis  results  flag 
/EPANL/ 


EPVPOT  -  EP  estimated  sensor  potential 

IEPAR  -  EP  analysis  results  flag 
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3.  Files. 


None. 

c.  Processing 

1.  If  end-of-data  flag  (THEEND)  is  set,  return  to  Subroutine  PROCES. 

2.  If  first  pass,  reset  condition  (GRESET),  new  satellite  (NEWSAT),  or  new  readout  (NEWREV), 
reset  the  necessary  flags  and  counters. 

3.  If  this  is  a  good  data  frame  and  the  previous  sweep  has  ended,  test  the  cycle  counter  to  determine 
if  this  cycle  is  the  start  point  for  a  new  sweep.  If  so,  establish  the  proper  sweep  direction  and  set 
sweep  status  to  new. 

4.  If  this  cycle  is  part  of  a  new  or  ongoing  sweep: 

(a)  Invoke  SWPCOL  to  gather  the  RPA  sweep  data. 

(b)  If  the  sweep  collection  is  complete: 

(1)  Set  the  analysis  results  time. 

(2)  Get  magnetic  latitude  from  ephemeris  block. 

(3)  Set  default  satellite  potential. 

(4)  Invoke  Subroutine  RPAALG  to  process  the  sweep. 

(5)  Return  to  Subroutine  PROCES. 

d.  Outputs. 

1.  Argument  list. 

None. 

2.  COMMON  blocks. 

/RPAANL/ 

IRPTIM  -  Valid  time  for  RPA  analysis  result 

3.  Files. 

None. 

e.  Associated  subroutines. 

1.  Subroutine  SWPCOL.  Collects  an  RPA  sweep  (see  2.4.4.2.1). 

2.  Subroutine  RPAALG.  Process  the  RPA  sweep  (see  2.4.4.3.1). 
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f.  Interfaces. 


1.  Called  by  Subroutine  PROCES. 

2.  Uses  COMMON  blocks  D FRAME,  RPACON,  SATEPH,  RPAANL,  and  EPANL. 


2.4.4.3.1  Subroutine  RPAALG. 


a.  Function. 


This  subroutine  processes  the  raw  RPA  current  vs.  voltage  curve.  Successful  analysis  will  result  in 
the  determination  of  ion  density,  ion  temperature,  ram  direction  drift  velocity,  and  sensor 
potential. 


b.  Inputs. 

1.  Argument  list. 
C 

GMLAT 

IRPDGP 


N 

SPIN 

V 

VAPER 

VS 

2.  COMMON  blocks. 
/CONSTS/ 

MP 

/RPACON/ 

DVLIM 
IRPMDV  - 
IRPSDV  - 
IRPWID  - 
RPXVB  - 
VARLIM  - 


3.  Files. 

None. 


Collected  RPA  sweep  currents 
Geomagnetic  latitude  of  spacecraft 
Diagnostic  output  flag 

0:  No  diagnostic  output 
1:  Generate  binary  diagnostic  file 
2:  Generate  ASCII  diagnostic  file 
3:  Generate  both  binary  and  ASCII  diagnostic  files 
Number  of  points  in  sweep 
Sensor  potential  input  default  value 
Collected  RPA  sweep  voltages 
Aperture  voltage  (VBIAS  +  VIP) 

Spacecraft  velocity 


Mass  of  a  proton 


Solution  test  criteria,  voltage  step  difference 
Maximum  number  of  derivatives  to  use  in  fit 
Starting  number  of  derivatives  to  use  in  fit 
Characteristic  width  for  relative  minima 
Helium  test  extra  bias  voltage 
Solution  test  criteria,  variance  limit 
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c.  Processing. 

1.  Initialize  variables  as  necessary. 

2.  Calculate  linear  current  from  the  input  log  values  and  validate  the  sweep. 

3.  Calculate  the  fractional  currents,  e.g.,  the  voltages  at  which  the  current  is  0.9*max,  0.8*max, . , 

0.1*  max. 

4.  Determine  the  usable  voltage  range  of  the  sweep. 

5.  Locate  the  minima  in  the  first  derivative  of  the  current-voltage  curve  (the  sweep). 

6.  Determine  the  ion  mode  (one  ion  or  two  ions)  and  select  either  hydrogen  or  helium  as  the 
predominant  light  ion.  Oxygen  is  assumed  to  be  the  heavy  ion  or  the  single  ion  case  species. 

7.  Calculate  the  plasma  parameters  based  upon  the  selected  ion  mode,  the  ion  masses,  and  the 
current  and  voltage  at  the  determined  sweep  derivative  minima. 

8.  Calculate  a  theoretical  sweep  based  upon  the  calculated  plasma  parameters  and  the  known 
instrument  configuration. 

9.  Compare  the  measured  sweep  against  the  theoretical  one.  If  the  agreement  is  good,  keep  this 
solution.  If  the  solution  is  not  within  the  user-specified  test  criteria,  vary  the  location  of  the  heavy 
ion  minima  slightly  and  return  to  step  7.  If  the  solution  meets  the  specified  criteria,  store  the 
analysis  results  and  exit. 


d.  Outputs. 


1.  Argument  list. 
None. 


2.  COMMON  blocks. 


/RPAANL/ 


IRPAR 

IRPLIF 

NRPASG 

NRPAST 

RPAUR 

RPEDEN 

RPHDEN 

RPITMP 

RPODEN 

RPVPOT 


RPA  processor  analysis  results  flag 
RPA  analysis  light  ion  flag 

Number  of  good  RPA  sweeps  processed  this  readout 

Number  of  RPA  sweeps  attempted  this  readout 

RPA  ram  direction  drift  velocity 

RPA  estimated  electron  density 

RPA  light  ion  density 

RPA  ion  temperature  (heavy  ion) 

RPA  heavy  ion  density 
RPA  sensor  potential 


3.  Files. 


None. 
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e.  Associated  subroutines. 


1.  Subroutine  CHKSWP.  Cleans  up  and  verifies  the  RPA  sweep  (see  2.4.43.2). 

2.  Subroutine  XPOS.  Locates  the  voltages  at  which  specified  intervals  in  the  sweep  current  are  to  be 
found  (see  2.4.43.5). 

3.  Subroutine  SSLOPE.  Locate  local  minima  in  the  first  derivative  of  the  current  vs.  voltage  curve 
(see  2.4.43.6). 

4.  Subroutine  PLASMA.  Calculate  the  environmental  parameters  from  the  engineering  type  data 
provided  by  the  instruments  (see  2.4.43.7). 

5.  Subroutine  RPASWP.  Calculate  the  expected  instrument  response  to  a  specified  plasma 
environment  (see  2.4.43.8). 

6.  Subroutine  COMPAR.  Calculate  the  variance  between  the  measured  sweep  and  the  theoretical 
sweep  specified  by  RPASWP  (see  2.4.43.9). 

7.  Subroutine  ANLSAV.  Store  a  potential  solution  in  a  specified  array  (see  2.4.43.10). 

8.  Subroutine  FITL1N.  Perform  a  least  squares  linear  fit  to  a  set  of  points  (see  2.4.8.6). 
f.  Interfaces. 

1.  Called  by  Subroutine  RPAPRC. 

2.  Uses  COMMON  blocks  CONSTS,  RPACON,  and  RPAANL. 


2.4.43.2  Subroutine  CHKSWP. 


a.  Function. 


Clean  up  and  verify  the  raw  sweep  data.  This  routine  attempts  to  eliminate  single  point 
anomalies,  determine  if  the  sweep  meets  the  established  range  criteria,  and  eliminate  any  useless 
data  at  the  end  of  the  sweep.  This  subroutine  is  mostly  based  upon  the  AFGL  routine 


CHECKDA. 


b.  Inputs. 

1.  Argument  list. 
C 

CL 

IRPDGP 


NUM 

V 


Sweep  currents  (linear) 

Sweep  currents  (log) 

RPA  diagnostic  output  flag 

0:  No  diagnostic  output 
1:  Generate  binary  diagnostic  file 
2:  Generate  ASCII  diagnostic  file 
3:  Generate  both  binaty  and  ASCII  diagnostic  files 
Number  of  points  in  sweep 
Sweep  voltages 
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2.  COMMON  blocks. 

/RPACON/ 

IRPMIN  -  Minimum  number  of  data  points  needed  for  analysis 

IRPWID  -  Characteristic  width  for  relative  minima 

RPCRNG  -  Required  current  range  for  an  analysis 

RPMAXV  -  RPA  sweep  maximum  voltage 

RPMINV  -  RPA  sweep  minimum  voltage 

RPMPCT  -  Maximum  current  lower  limit  (%  of  sensitivity) 

RPNSD1  -  Acceptable  first  noise  level  decrease  in  current 

RPNSD2  -  Acceptable  second  noise  level  decrease  in  current 

RPNSUP  -  Acceptable  noise  level  increase  in  current 
RPSENS  -  RPA  instrument  sensitivity 

3.  Files. 

None. 

c.  Processing. 

1.  Locate  a  valid  sweep  starting  point.  The  start  must  be  at  least  a  specified  percent  level  above  the 
instrument  sensitivity.  Successive  points  must  be  within  expected  noise  limits  of  each  other.  In 
performing  the  specified  checks  in  this  routine,  the  sweep  is  scanned  from  low  voltage  to  high 
voltage  (maximum  current  to  minimum  current). 

2.  Check  for  monotonically  increasing  voltages  and  other  indications  of  trash  such  as  currents  less 
than  the  instrument  sensitivity  and  sweep  voltages  outside  the  specified  instrument  sweep  range. 

3.  Ideally,  clean  sweeps  should  be  monotonically  decreasing  in  current  as  well.  However,  since  the 
environment  is  not  stable  during  the  entire  sweep  period  and  there  is  round-off  error  in  encoding 
the  data  into  the  telemetry  stream,  we  must  allow  for  current  variations  in  both  directions  within 
the  user-specified  limits  of  geophysical  and  telemetry  noise. 

4.  Locate  the  maximum  and  minimum  currents.  The  maximum  current  is  the  mean  value  of  a 
specified  number  of  points  at  the  low  voltage  end  of  the  sweep. 

5.  Test  the  current  range  and  remaining  number  of  points  to  determine  whether  the  sweep  is  usable. 

d.  Outputs. 

1.  Argument  list. 


c 

Sweep  currents  (linear) 

CL 

Sweep  currents  (log) 

CMAX 

Calculated  maximum  current  level 

GOOD 

Sweep  quality  flag 

IMAX 

Array  location  of  max  current 

NUM 

Number  of  points  remaining  in  sweep 

V 

Sweep  currents 

VCMAX  - 

Voltage  at  sweep  maximum  current  location 
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2. 


COMMON  blocks. 


None. 

3.  Files. 

None. 

e.  Associated  subroutines. 

1.  Subroutine  RPDIAG.  Provide  diagnostic  messages  to  the  user  (see  2.4.4.3.3). 

2.  Subroutine  MEANSD.  Calculate  the  mean  and  standard  deviation  of  a  portion  of  a  table  of 
values  (see  2.4.4.3.4). 

f.  Interfaces. 

1.  Called  from  Subroutine  RPAALG. 

2.  Uses  COMMON  block  RPACON. 


2.4.4.3.3  Subroutine  RPDIAG. 
a.  Function. 

Provide  diagnostic  messages  to  the  user  concerning  problems  encountered  during  RPA  data 
processing.  Additionally,  provide  a  copy  of  the  raw  RPA  sweep  for  further  diagnostic  study  at  a 
later  time. 


b.  Inputs. 

1.  Argument  list. 


VOLT 

CURR 

MSG 

IDIAG 


RPA  raw  sweep  voltage  array 
RPA  raw  sweep  current  array 
Diagnostic  message  number 
RPA  diagnostic  output  flag 

0:  No  diagnostic  output 
1:  Generate  binary  diagnostic  file 
2:  Generate  ASCII  diagnostic  file 
3:  Generate  both  types  of  diagnostic  files 


2.  COMMON  blocks. 


/DFRAME/ 


IDTIME 

IQFRME 

VBIAS 


Data  frame  time  (seconds  since  midnight  GMT) 
Data  frame  quality  flag 
Instrument  bias  voltage 
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/LUDIAG/ 

LURPAA  - 
LURPAB  - 

Logical  file  number  for  RPA  ASCII  diagnostic  file 
Logical  file  number  for  RPA  binary  file 

/PROCON/ 

IFLT 

Vehicle  flight  number 

/RPAANL/ 

IRPLIF 

IRPTIM  - 
RPAUR  - 
RPITMP  - 
RPHDEN  - 
RPODEN  - 
RPVPOT  - 

Light  ion  type  flag 

RPA  sweep  time  (seconds  since  midnight  GMT) 
RPA  ram  direction  drift  velocity 

RPA  ion  temperature 

RPA  light  ion  density 

RPA  heavy  ion  density 

RPA  sensor  potential 

3.  Files. 

None. 

c.  Processing. 

1.  The  design  is  for  a  short,  single  line,  diagnostic  concerning  any  problem  encountered  in  the  sweep 
analysis  so  that  any  trends  or  repetitive  data  problems  can  be  isolated. 

2.  On  first  call,  open  the  requested  diagnostic  files.  The  binary  file  will  contain  the  raw  RPA  sweep 
and  any  analysis  accomplished  by  this  processor.  The  ASCII  file  will  contain  any  diagnostic 
messages  relating  to  the  processor  analysis. 

d.  Outputs. 

1.  Argument  list. 

None. 

2.  COMMON  blocks. 

None 

3.  Files. 

Diagnostic  print  to  IESRPAPRT  and  binary  output  to  file  IESRPADIAG. 

e.  Associated  subroutines. 

None. 
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f.  Interfaces. 


1.  Called  from  RPAALG  and  CHKSWP. 

2.  Uses  COMMON  blocks  D FRAME,  LUDIAG,  PROCON,  RPAANL,  and  RPACON. 

2.4.43.4  Subroutine  MEANSD. 

a.  Function. 

Calculate  the  mean  and  standard  deviation  of  the  first  specified  number  of  elements  in  a  table  of 
values. 

b.  Inputs. 

1.  Argument  list. 

M  -  Number  of  values  to  use,  starting  with  the  first  value  in  the  table 

Y  -  Value  table 

2.  COMMON  blocks. 

None. 

3.  Files. 

None. 

c.  Processing. 

1.  Calculate  the  mean  value  of  the  specified  points. 

2.  Calculate  the  standard  deviation. 

d.  Outputs. 

1.  Argument  list. 

SIG  -  Standard  deviation 

YM  -  Mean  value 

2.  COMMON  blocks. 

None. 

3.  Files. 

None. 
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e.  Associated  subroutines. 


None, 
f.  Interfaces. 

1.  Called  by  Subroutine  CHKSWP. 

2.  Uses  no  COMMON  blocks. 


2.4.4.3.5  Subroutine  XPOS. 

a.  Function. 

Locate  the  voltages  at  which  specified  intervals  in  the  sweep  current  are  to  be  found. 

b.  Inputs. 


1.  Argument  list. 

K 

N 

X 

Y 

YMAX 

2.  COMMON  blocks. 

None. 


Number  of  current  intervals 
Number  of  table  values 
Ordinate  table 
Function  table 
Maximum  function  value 


3.  Files. 

None. 

c.  Processing. 

1.  Calculate  the  required  current  level. 

2.  Scan  the  sweep  until  the  sweep  data  points  on  either  side  of  the  current  of  interest  are  located. 
Remember  that  the  sweep  is  assumed  to  be  monotonically  decreasing  currents. 

3.  Perform  a  linear  interpolation  to  specify  the  voltage  at  which  the  current  level  occurs. 

4.  Make  sure  we  found  a  value  for  each  current  value  (i.e.,  test  the  current  range).  A  bad  sweep  flag 
is  returned  if  values  cannot  be  found.  If  it  is  specified  that  the  current  is  to  be  divided  into  tenths, 
the  sweep  current  must  drop  to  one  tenth  the  max  current  or  a  bad  sweep  flag  will  be  returned. 
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d.  Outputs. 


1.  Argument  list. 


DFX 

- 

Differences  between  ordinate  fractional  values 

FX 

- 

Ordinates  for  fractional  values 

FY 

- 

Fractional  function  values 

GOOD 

- 

Result  flag 

JF 

- 

Data  index  location  of  fractional  values 

2.  COMMON  blocks. 

None. 

3.  Files. 

None. 

e.  Associated  subroutines. 

None. 

f.  Interfaces. 

1.  Called  from  Subroutine  RPAALG. 

2.  Uses  no  COMMON  blocks. 


2.4.4.3.6  Subroutine  SSLOPE 


a.  Function. 


Locate  local  relative  minima  in  the  first  derivative  of  the  current  vs.  voltage  sweep. 


b.  Inputs. 

1.  Argument  list. 


C 

LCMAX 

NUM 

NUMFIT 

V 


Sweep  current  values 

Array  location  of  maximum  current 

Number  of  current  values 

Number  of  data  points  to  use  in  linear  fit 

Sweep  voltage  values 


2.  COMMON  blocks. 


None. 


3.  Files. 


None. 
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c.  Processing. 

1.  Calculate  the  first  derivative  at  each  point  in  the  sweep  based  upon  the  specified  number  of  points 
to  use  in  the  linear  fit.  Derivative  calculation  in  all  steps  is  based  upon  a  least  squares  linear  fit 
to  successive  data  points. 

2.  Locate  the  local  minima  by  examination  of  the  second  derivative  using  the  linear  fit  routines  in 
the  first  derivative  values. 

3.  Store  the  location  of  each  local  minima  found. 


d.  Outputs. 


1.  Argument  list. 

BI 

KS 

NS 

S 


Intercept  for  linear  fit  at  the  local  slope  minima 
Data  point  location  of  the  local  slope  minima 
Number  of  local  slope  minima  found 
Slope  of  current  curve  at  the  local  minima 


2.  COMMON  blocks. 


None. 


3.  Files. 

None. 


e.  Associated  subroutines. 


None. 


f.  Interfaces. 

1.  Called  from  Subroutine  RPAALG. 

2.  Uses  no  COMMON  blocks. 


2.4.4.3.7  Subroutine  PLASMA. 

a.  Function. 

Calculate  the  environmental  parameters  from  the  engineering  type  data  provided  by  the  Retarding 
Potential  Analyzer. 

b.  Inputs. 

1.  Argument  list. 

CION  -  Currents  at  constituent  ion  local  slope  minima 

CMAX  -  Maximum  sweep  current 
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GMLAT  - 
MASS 
MODE 
SLOPE 
SPIN 
VION 
VS 

2.  COMMON  blocks. 

/CONSTS/ 

E 
K 

MP 

/PIDEG/ 

PI 

/RPACON/ 

RPLMAX  - 
RPAREA  - 
RPTRAN  - 

3.  Files. 

None. 

c.  Processing. 

1.  Test  the  slope  value  determined  at  the  local  minima  of  the  first  derivative  of  the  current  vs. 
voltage  curve  specified  by  the  RPA  sweep.  If  a  valid  value  has  been  specified,  proceed  with  the 
calculations  and  test  for  negative  current  values. 

2.  If  the  ion  mode  is  two,  calculate  the  parameters  for  both  the  heavy  and  the  light  ion  species. 

3.  If  the  ion  mode  is  one,  only  the  heavy  ion  is  present.  If  only  one  local  minimum  in  the  derivative 
of  the  sweep  current  was  found,  we  can  not  calculate  all  parameters  of  interest  unambiguously. 
Therefore,  we  must  make  some  assumptions. 

(a)  If  we  are  in  geomagnetic  auroral  or  polar  latitudes,  use  an  estimated  sensor  potential  and 
calculate  the  ram  direction  drift  velocity. 

(b)  If  we  are  in  geomagnetic  mid-latitudes,  assume  that  the  ram  direction  drift  velocity  is  zero  and 
calculate  the  sensor  potential. 


Geomagnetic  latitude 

Constituent  ion  atomic  mass  units 

Ion  processing  mode 

Slope  at  heavy  ion  local  slope  minima 

Default  sensor  potential  for  one  ion  mode 

Voltages  at  ion  constituent  slope  minima 

Spacecraft  velocity 


Electron  charge 
Boltzmann’s  constant 
Mass  of  a  proton 


it 


Magnetic  latitude  limit  for  drift  velocity  =  0  assumption 
RPA  instrument  aperture  area 
RPA  instrument  transparency 
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d.  Outputs. 


1.  Argument  list. 

DH  -  Heavy  ion  density 

DL  -  Light  ion  density 

DRVEL  -  Average  ram  direction  drift  velocity 

RPAPOT  -  RPA  sensor  potential 

TI  -  Heavy  ion  temperature 

2.  COMMON  blocks. 

None. 

3.  Files. 

None. 

e.  Associated  subroutines. 

None. 

f.  Interfaces. 

1.  Called  from  Subroutine  RPAALG. 

2.  Uses  COMMON  blocks  CONSTS,  PIDEG,  and  RPACON. 


2.4.43.8  Subroutine  RPASWP 

a.  Function. 

Calculate  the  expected  instrument  response  to  a  specified  plasma  environment  based  upon  the 
engineering  parameters  of  the  RPA  instrument. 

b.  Inputs. 

1.  Argument  list. 

MI  -  Atomic  masses  of  constituent  ions 

NI  -  Number  densities  of  ion  constituents 

NVOLTS  -  Number  of  voltages  at  which  currents  desired 
SCPOT  -  Sensor  potential 

TI  -  Ion  temperature 

VNORM  -  Normal  component  of  velocity  between  sensor  and  ions 
VOLTS  -  Voltages  at  which  currents  desired 
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2.  COMMON  blocks. 


/RPACON/ 

RPAREA  -  RPA  instrument  aperture  area 

RPTRAN  -  RPA  instrument  transparency 

/CONSTS/ 

E  -  Electron  charge 

K  -  Boltzmann’s  constant 

/PIDEG/ 

PI  -  x 

3.  Files. 

None. 

c.  Processing. 

1.  Calculate  the  instrument  parameters. 

2.  Calculate  most  probable  speed  of  the  ion  constituents  based  upon  the  provided  environment 
parameters  and  the  ratio  of  that  speed  to  the  spacecraft  velocity. 

3.  Calculate  the  current  contribution  of  each  constituent  ion  based  upon  the  previously  calculated 
parameters,  the  sensor  potential  relative  to  the  ambient  plasma,  and  the  specified  ion  densities. 

d.  Outputs. 

1.  Argument  list. 

CUR  -  Theoretical  currents  at  requested  voltages 

2.  COMMON  blocks. 

None. 

3.  Files. 

None. 

e.  Associated  subroutines. 

None. 

f.  Interfaces. 

1.  Called  from  RPAALG. 
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2.  Uses  COMMON  blocks  CONSTS,  PIDEG,  and  RPACON. 


2.4.4.3.9  Subroutine  COMPAR. 

a.  Function. 

Calculate  the  variance  between  the  measured  sweep  and  the  theoretical  sweep  specified  by 
Subroutine  RPASWP  for  both  the  linear  and  the  log  current  values. 

b.  Inputs. 

1.  Argument  list. 


c 

Measured  sweep  currents  (linear) 

CL 

Measured  sweep  currents  (log) 

CMIN 

Minimum  sweep  current 

CT 

Theoretical  sweep  currents 

LH 

Location  of  heavy  ion  slope  minimum 

MODE 

Ion  processing  mode  (l=single  ion,  2=two  ions) 

N 

Number  of  data  points  in  sweep 

2.  COMMON  blocks. 

None. 

3.  Files. 

None. 

c.  Processing. 

1.  If  the  current  values  appear  valid: 

(a)  Calculate  the  differences  between  the  actual  and  theoretical  linear  and  log  current  values. 

(b)  Sum  up  the  square  of  the  differences. 

2.  Divide  by  the  number  of  values  summed  to  calculate  the  variance. 

d.  Outputs. 

1.  Argument  list. 

DCI  -  Current  differences  near  heavy  ion  sweep  slope  minimum 

SUM  -  Sum  of  current  differences  (linear) 

SUML  -  Sum  of  current  differences  (log) 

2.  COMMON  blocks. 

None. 
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3.  Files. 


None. 

e.  Associated  subroutines. 

None. 

f.  Interfaces. 

1.  Called  from  Subroutine  RPAALG. 

2.  Uses  no  COMMON  blocks. 


2.4.4.3.10  Subroutine  ANLSAV, 

a.  Function. 

Store  a  potential  RPA  sweep  solution  in  a  specified  array. 

b.  Inputs. 

1.  Argument  list. 


C2 

Current  at  heavy  ion  slope  minima 

DH 

Heavy  ion  density 

DL 

Light  ion  density 

DV 

Ram  direction  drift  velocity 

Ml 

Light  ion  AMU 

MODE 

Ion  processing  mode 

S 

Slope  at  heavy  ion  slope  minima 

SP 

Sensor  potential 

SUM 

Linear  variance 

SUML 

Log  variance 

TI 

Ion  temperature 

V2 

Voltage  at  heavy  ion  slope  minima 

COMMON  blocks. 

None. 

3.  Files. 

None. 

c.  Processing. 

1.  Increment  the  array  index  counter. 

2.  Store  the  individual  values. 
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d.  Outputs. 


1.  Argument  list. 

AA  -  Analysis  results  array 

NSOL  -  Number  of  potential  solutions  in  the  analysis  results  array 

2.  COMMON  blocks. 

None. 

3.  Files. 

None. 

e.  Associated  subroutines. 

None. 

f.  Interfaces. 

1.  Called  from  Subroutine  RPAALG. 

2.  Uses  no  COMMON  blocks. 


2.4.4.4  Subroutine  DMPRC. 


a.  Function. 

Convert  voltages  from  the  Drift  Meter  (DM)  into  ion  densities  and  horizontal  and  vertical  cross 
track  ion  drift  velocities.  Figure  11  is  a  hierarchy  chart  for  this  module.  The  DM  data  processing 
algorithm  is  described  in  Appendix  B.3. 


b.  Inputs. 

1.  Argument  list. 

NEWSAT 

NEWREV 

GRESET 

THEEND 

IDODM 


IDIAG 


New  satellite  flag 
New  readout-REV  flag 
General  reset  flag 
End-of-data  flag 
DM  process  control  switch 
0:  OFF,  1:  ON 
bit  1  (LSB):  Normal  mode 

bit  2:  H+  mode 

bit  3:  DM  FIBA 

Diagnostic  output  flag 


¥ 


94 


DMPRC: 

process  driftmeter  (DM)  data 

DMINFO: 

determine  current  state  of  DM  sensor 

.  DMCMD: 

interpret  DM  command  value 

.  .  DMSWCH: 

set  processing  status  for  DM  mode  change 

. .  PRNTON: 

set  PRINTAWAY  status  for  conclusion  of  processing 

.  PRNTON: 

set  PRINTAWAY  status  for  conclusion  of  processing 

PRNTON: 

set  PRINTAWAY  status  for  conclusion  of  processing 

DMVEL: 

convert  DM  voltages  to  ion  drift  velocity  and  angle  of  arrival 

PRMRNG: 

check  environment  parameters  against  allowed  ranges 

DMDEN: 

calculate  ion  density  for  DM  log  level  data 

DMFIBA: 

convert  DM  filter  band  values  to  power  spectral  density  values 

.  OPNDOF: 

initialize  diagnostic  output  file 

.  .  BITON: 

test  for  bit  setting 

.  .  FILERR: 

determine  and  report  file  error  status 

.  .  PRNTON: 

set  PRINTAWAY  status  for  conclusion  of  processing 

HPMODE: 

report  DM  H+  mode  data 

.  OPNDOF: 

initialize  diagnostic  output  file 

.  .  BITON: 

test  for  bit  setting 

.  .  FILERR: 

determine  and  report  file  error  status 

.  .  PRNTON: 

set  PRINTAWAY  status  for  conclusion  of  processing 

DMDIAG: 

report  DM  processing  diagnostics 

.  OPNDOF: 

initialize  diagnostic  output  file 

.  .  BITON: 

test  for  bit  setting 

.  .  FILERR: 

determine  and  report  file  error  status 

.  .  PRNTON: 

set  PRINTAWAY  status  for  conclusion  of  processing 

.  FILERR: 

determine  and  report  file  error  status 

Figure  11  DMPRC  module  hierarchy  chart 
2.  COMMON  blocks. 


/CONSTS/ 

E  -  Electron  charge  (coulombs) 

/D  FRAME/ 


IDTIME  - 
ICYCLE  - 
IQFRME  - 
DMOFF  - 
MONDSM  - 
DMLL 


DMFILT  - 


Time  of  current  data  frame  (seconds  since  midnight) 
Data  frame  cycle  ID  (1  or  2) 

Data  frame  quality  flag 
12  offset  voltages  from  the  DM  sensor 
DSM  command  from  last  cycle  2  data  frame 
Log-level  voltage  from  DM  sensor 
cycle  1:  LLA 
cycle  2:  LLB 
DM  filter  values 


/DMCON/ 


CMK1 

DMAEFF 


Velocity  calculation  constant 
Effective  area  of  DM  sensor  (cm2) 


DMK2 

Density  calculation  constant 

DMOOFF  - 

Nominal  offset  data  zero  voltage  (volts) 

DMAG 

Gain  of  LLA  amplifier 

DMBG 

Gain  of  LLB  amplifier 

DMBOFF  - 

Offset  of  LLB  amplifier  (volts) 

ANGMAX  - 

Maximum  allowed  angle-of-arrival  (deg) 

DMSH 

Sign  of  horizontal  velocity  (±1) 

DMSV 

Sign  of  vertical  velocity  (±1) 

IDMH 

Location  marker  for  horizontal  velocity  (0  or  1) 

IDMV 

Location  marker  for  vertical  velocity  (1  or  0) 

NOLL 

LL  reliability  flag 

NOHP 

H+  mode  reliability  flag 

IDMUR  - 

RPA  Ram  velocity  use  flag 

/RPAANL/ 

RPAUR  - 

Ram  ion  drift  velocity  (m/s) 

/SATEPH/ 

vsc 

Satellite  orbital  velocity  (m/s) 

/SCSOH/ 

DMVO 

DM  sensor  offset  voltage 

c.  Processing. 

1.  If  no  more  data,  return  to  Subroutine  PROCES. 

2.  Reset  processing  flags  for  a  new  satellite,  new  REV,  or  a  general  reset  and  decode  DM  processing 
switches. 

3.  Invoke  Subroutine  DMINFO  to  determine  the  status  of  the  DM  sensor  and  break  out  the  cycle 
dependent  DM  data  in  the  current  data  frame. 

4.  If  the  data  frame  is  bad,  or  if  DM  processing  is  in  a  wait  status,  return  to  Subroutine  PROCES. 

5.  Use  the  nominal  offset  zero  voltage  (DMOOFF)  for  the  offset  measurements. 

6.  Calculate  the  total  velocity  of  the  ions  with  respect  to  the  satellite  using  the  RPA  analysis  ram 
velocity  when  applicable. 

7.  If  normal  mode  data  are  to  be  processed: 

(a)  Convert  each  pair  of  horizontal/vertical  offset  voltages  into  horizontal  and  vertical  drift 
velocities  (Function  DMVEL).  Calculate  the  average  horizontal  and  vertical  drift  velocities. 

(b)  Save  the  tangent  of  the  angle-of-arrival  (TANA)  from  the  offset  voltage  nearest  (in  the  data 
frame)  to  the  DMLL  data  for  use  in  calculating  ion  density  from  the  DMLL  data. 

(c)  If  the  DM  repeller  voltage  is  near  zero,  invoke  Function  DMDEN  to  calculate  the  ion  density 
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from  the  DMLL  voltage. 


(d)  If  in  H+  mode,  calculate  one  set  of  drift  velocities  from  the  first  pair  of  horizontal/vertical 
offset  voltages.  Set  the  average  velocities  to  these  values. 

8.  If  in  FIBA  mode,  and  FIBA  mode  data  are  to  be  processed,  invoke  Subroutine  DMFIBA  to 
process  the  data. 

9.  If  in  H+  mode,  and  H+  mode  data  are  to  be  processed,  invoke  Subroutine  HPMODE  to  process 
the  data. 

10.  If  diagnostic  output  was  requested,  invoke  Subroutine  DMDIAG  to  produce  the  output. 

11.  Return  to  Subroutine  PROCES. 
d.  Outputs. 


COMMON  blocks. 

/DMANL/ 

DMUH 

Horizontal  ion  drift  velocities  (6)  (m/s) 

DMAUH  - 

Average  horizontal  ion  drift  velocity  (m/s) 

DMUV 

Vertical  ion  drift  velocities  (6)  (m/s) 

DMAUV  - 

Average  vertical  ion  drift  velocity  (m/s) 

DMIDEN  - 

Ion  density  (ion/cnr1) 

IDMMDE  - 

DM  sensor  mode 

IDMEF 

0=Normal;  1-8=H+;  9=FIBA 
DM  analysis  error  flag 

IDMAR 

DM  analysis  results  flag 

e.  Associated  subroutines. 

1.  Function  BITON.  Determine  if  a  specific  bit  in  a  word  is  set  (see  2.4.8.2). 

2.  Function  DMINFO.  Determine  the  status  of  the  DM  sensor  and  extract  cycle-dependent  data 
from  the  data  frame  (see  2.4.4.4.1). 

3.  Subroutine  PRNTON.  Disable  the  PRINTAWAY  processor  and  set  the  console  message  error 
flag  (see  2.4.8.11). 

4.  Function  DMVEL.  Calculate  ion  drift  velocity  (see  2.4.4.4.4). 

5.  Function  DMDEN.  Calculate  ion  density  (see  2.4.4.4.5). 

6.  Subroutine  DMFIBA.  Process  filter  data  (see  2.4.4.4.6). 

7.  Subroutine  HPMODE.  Process  H+  mode  data  (see  2.4.4.4.7). 

8.  Subroutine  DMDIAG.  Generate  diagnostic  output  (see  2.4.4.4.8). 

9.  Function  PRMRNG.  Determine  if  a  parameter  is  within  the  allowed  range  (see  2.4.8.10). 
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f.  Interfaces. 


1.  Called  from  Subroutine  PROCES. 

2.  Uses  COMMON  blocks  CONSTS,  DFRAME,  DMANL,  DMCON,  PIDEG,  RPAANL,  SATEPH, 
and  SCSOH. 


2.4.4.4.1  Subroutine  DMINFO. 

a.  Function. 

Determine  the  present  status  of  the  DM  sensor  and  extract  cycle  dependent  data  from  the  data 
frame. 

b.  Inputs. 

1.  Argument  list. 


RESET 

Reset  flag  (LOGICAL) 

ICYCLE  - 

Data  frame  cycle  ID  (1  or  2) 

ICCNTR  - 

Data  frame  cycle  counter  (1  -  1024) 

IQFRME  - 

Data  frame  quality  flag 

IDTIME  - 

Data  frame  time 

MONDSM  - 

DSM  command  from  last  cycle  2  data  frame 

DMLL 

Log-level  voltage  from  DM  sensor 
cycle  1:  LLA 
cycle  2:  LLB 

IDMMDE  - 

DM  sensor  mode 

0=Normal;  1-8=H+;  9=FIBA 

IHPCYC  - 

H+  mode  cycle  counter 

NOLL 

LL  reliability  flag 

DMRV 

DM  repeller  voltage 

c.  Processing. 

1.  If  a  reset  is  called  for  (new  satellite,  readout  REV,  or  initialization),  set  wait  flag  and  initialize 
wait  and  H+  mode  counters  to  prevent  processing  of  data  before  DM  operation  mode  can  be 
determined. 

2.  Decrement  mode  switch  cycle  counter.  When  counter  =  0,  switch  to  new  mode,  release  wait,  and 
initialize  H+  cycle  counter. 

3.  If  in  H+  mode,  increment  H+  cycle  counter.  (Range  =  1-4) 

4.  If  the  data  frame  is  bad,  return  to  Subroutine  DMPRC. 

5.  If  this  is  an  even  data  cycle  (2,  4,  ..),  invoke  Subroutine  DMCMD  to  process  DM  command 
information 

6.  If  the  LL  data  is  in  normal  range,  the  reliability  flag  is  OK  (NOLL=0),  and  we  are  not  in  a  wait 
state,  save  the  LL  data  for  processing. 
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7.  If  a  reset  call,  place  the  processing  into  wait  status. 


8.  When  in  a  wait  state,  turn  on  the  print  (Subroutine  PRNTON),  alert  the  user  when  the  wait 
begins,  when  it  has  been  waiting  for  20  seconds,  and  every  10  minutes  thereafter. 

9.  Return  to  Subroutine  DMPRC. 

d.  Outputs. 

1.  Argument  list. 

IDMMDE  -  DM  sensor  mode 

0=Normal;  1-8=H+;  9=FIBA 
IHPCYC  -  H+  mode  cycle  counter 

DMRV  -  DM  repeller  voltage 

DMLLA  -  LLA  voltage  (cycle  1) 

LLAOK  -  LLA  quality  flag  (cycle  1) 

DMLLB  -  LLB  voltage  (cycle  2) 

LLBOK  -  LLB  quality  flag  (cycle  2) 

WAIT  -  Wait  status  flag 

e.  Associated  subroutines. 

1.  Subroutine  DMCMD.  Process  the  DM  command  (see  2.4.4.4.2). 

2.  Subroutine  PRNTON.  Disable  the  PRINTAWAY  processor  and  set  the  console  error  message 
flag  (see  2.4.8.11). 

f.  Interfaces. 

1.  Called  from  Subroutine  DMPRC. 

2.  Uses  no  COMMON  blocks. 


2.4.4.4.2  Subroutine  DMCMD. 

a.  Function. 

Process  DM  sensor  commands. 

NOTE:  DMCMD  processing  is  specific  to  IES2  and  IES2A  only.  When  IES3  comes  on  line, 

DMCMD  may  need  to  be  modified  to  handle  any  IES3  specific  DSM  command  codes.  If 
it  becomes  necessary  to  process  IES  data,  DMCMD  must  be  modified  to  handle  the  IES 
specific  DM  command  codes. 

b.  Inputs. 

1.  Argument  list. 

RESET  -  New  satellite/REV  flag 
MONDSM  -  DSM  command  (from  data  frame) 


DMRV 

IDMMDE 

ICCNTR 


DM  repeller  voltage  (volts) 

DM  sensor  mode  (0  -  9) 

0= Normal;  1-8=H+;  9=F1BA 
Data  cycle  counter  (1  -  1024) 


2.  COMMON  blocks. 


/RGSTAT/ 


IDMSTA 

IRPSTA 

ISTSTA 


DM  mode  status 
Repeller  level  status 
Subcom  processing  status 


c.  Processing. 

1.  If  a  reset  is  required,  set  last  command  to  -1. 

2.  If  the  current  DM  command  matches  previous  one,  set  the  new  command  flag  (NEWCMD)  to 

.FALSE,  and  jump  to  step  4. 

3.  If  there  is  a  new  command  and  it  is  a  valid  DM  command: 

(a)  set  new  command  flag  to  .TRUE,  and  set  last  command  to  command  value. 

(b)  If  the  command  is  a  ’normal’  or  an  H+  mode  command,  invoke  Subroutine  DMSWCH  to 
determine  which  mode  has  been  selected  and  at  which  cycle  it  will  begin. 

(c)  If  the  command  is  a  DM  FIBA  mode  command,  invoke  Subroutine  DMSWCH  to  determine 
the  proper  mode  and  to  determine  at  which  cycle  it  will  begin. 

(d)  If  the  command  is  to  change  the  repeller  voltage,  and: 

(1)  we  are  currently  in  H+  mode,  invoke  Subroutine  DMSWCH  to  determine  the  proper 
cycle  for  the  repeller  voltage  and  mode  switch. 

(2)  we  are  in  normal  or  FIBA  mode,  calculate  the  new  repeller  voltage,  alert  the  user  to  the 
change,  and  set  the  wait  flag  to  skip  processing  for  this  cycle  and  resume  processing  on 
the  next  cycle  with  the  new  repeller  voltage. 

(e)  If  the  command  is  to  change  the  ’wiggle’  level  (H+  mode)  setting  and: 

(1)  we  are  in  FIBA  mode,  this  is  an  abnormal  command  for  FIBA  mode.  Alert  the  user  and 
disregard  the  command. 

(2)  calculate  the  H+  mode  from  the  command  value,  invoke  Subroutine  DMSWCH  to 
determine  the  proper  cycle  for  the  mode  change  to  take  place,  and  alert  the  user  of  the 
mode  change. 

(f)  Otherwise,  this  was  a  ’spares’  command.  Alert  the  user  and  disregard  the  command. 
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4. 


If  the  current  16  second  subcom  status  is  available: 


(a)  if  the  subcom  status  does  not  match  current  command  mode  status,  alert  the  user,  set  the  DM 
mode  status  to  that  of  the  subcom,  and  set  the  wait  flag  to  skip  this  cycle  and  resume 
processing  in  the  new  mode  on  the  next  cycle. 

(b)  set  the  repeller  voltage  from  the  subcom  information. 

5.  If  the  return  status  is  not  zero,  invoke  Subroutine  PRNTON  to  turn  on  the  print. 


6.  Return  to  Subroutine  DMINFO. 


d.  Outputs. 


1.  Argument  list. 

DMRV 

IDMMDE 

IHPCYC 

NCTOGO 

NXTMDE 

WAIT 

ISTAT 


DM  repeller  voltage 
DM  sensor  mode 

0=Normal;  1-8=H+;  9=FIBA 
H+  cycle  counter 

Number  of  cycles  to  wait  for  mode  change. 
Mode  which  takes  effect  when  NCTOGO  =  0 
Processing  wait  flag 
Return  status 


e.  Associated  subroutines. 


1.  Subroutine  DMSWCH.  Determine  when  a  DM  mode  switch  will  be  activated  (see  2.4.4.43) 

2.  Subroutine  PRNTON.  Disable  the  PRINTAWAY  processor  and  set  the  console  error  message 
flag  (see  2.4.8.11). 

f.  Interfaces. 


1.  Called  from  Subroutine  DMINFO. 

2.  Uses  COMMON  block  RGSTAT. 


2.4.4.43  Subroutine  DMSWCH. 

a.  Function. 

Set  the  proper  parameters  for  a  Driftmeter  mode  switch. 

b.  Inputs. 

1.  Argument  list. 

ICCNTR  -  Data  cycle  counter  (1  -  1024) 

IDMMDE  -  Drift  meter  sensor  mode  (0  -  9) 

0=Normal;  1-8=H+;  9=FIBA 
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NXTMDE 


Next  commanded  DM  mode 


c.  Processing. 

1.  Calculate  the  number  of  data  cycles  until  the  next  16  secsync  pulse.  Note  that  H+  and  FIBA 
modes  activate  and  deactivate  only  on  16  second  (secsync)  cycle  boundaries. 

2.  Determine  whether  to  continue  processing  in  the  current  mode,  or  to  suspend  processing  until  the 
mode  switch  occurs. 

d.  Outputs. 

1.  Argument  list. 

NCTOGO  -  Number  of  data  cycles  until  mode  switch  occurs 

WAIT  -  Suspend  DM  processing  flag  (LOGICAL): 

.TRUE.:  suspend  processing  until  mode  switch 
.FALSE.:  continue  in  current  mode  until  switch 


e.  Associated  subroutines 

None. 

f.  Interfaces. 

1.  Called  from  Subroutine  DMCMD. 

2.  Uses  no  COMMON  blocks. 


2.4.4.4.4  Function  DMVEL. 


a.  Function. 


Calculate  the  ion  drift  velocity. 


b.  Inputs. 


1.  Argument  list. 
R 

DMK1 

VOFF 

VTOT 

TANMAX 


Offset  current  ratio  from  DM  sensor  (volts) 
Drift  velocity  calculation  constant 
Zero  voltage  for  offset  measurement  (volts) 
Total  ion  velocity  w.r.t.  satellite  (m/s) 
Tangent  of  maximum  allowed  angle-of-arrival 


c.  Processing. 

1.  Calculate  the  tangent  of  the  ion  angle-of-arrival. 

2.  If  the  angle  is  within  the  allowed  range,  calculate  the  drift  velocity.  If  not,  set  the  drift  velocity 
and  the  tangent  to  the  missing  data  flag  (the  TANA  variable  is  also  set  to  XMSSNG  as  it  is  used 
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in  the  ion  density  calculation). 
3.  Return  to  Subroutine  DMPRC. 


d.  Outputs. 

1.  Function  value. 

DMVEL  -  Ion  drift  velocity  (m/s) 

e.  Associated  subroutines. 

None. 

f.  Interfaces. 

1.  Called  from  Subroutine  DMPRC. 

2.  Uses  no  COMMON  blocks. 


2.4.4.4.5  Function  DMDEN. 

a.  Function. 

Convert  the  voltage  from  one  of  the  DM  log-level  amplifiers  into  an  ion  density. 

b.  Inputs. 


Argument  list. 

DMLL 

LLA/LLB  voltage 

LLOK 

Log-level  quality  flag  (set  in  DMINFO) 

TANA 

Tangent  of  the  latest  angle-of-arrival 

DMG 

Amplifier  gain 

DMO 

Amplifier  offset 

CONST1  - 

E  x  DMAEFF  x  106 

DMK2 

Density  calculation  constant 

VTOT 

Total  velocity  of  ions  w.r.t.  satellite  (m/s) 

c.  Processing. 

1.  If  the  LL  data  and  the  angle-of-arrival  data  are  good,  calculate  the  ion  density.  Otherwise,  set  the 
density  to  the  missing  data  flag. 

2.  Return  to  Subroutine  DMPRC. 

d.  Outputs. 

1.  Function  value. 

DMDEN  -  Ion  density  (ion/cm3) 
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e.  Associated  subroutines. 


None, 
f.  Interfaces. 

1.  Called  from  Subroutine  DMPRC. 

2.  Uses  no  COMMON  blocks. 


2.4A.4.6  Subroutine  DMFIBA. 

a.  Function. 

Convert  the  voltages  from  the  Driftmeter  filter  comb  (FIBA)  into  power  spectral  density  (PSD) 
estimates  at  the  specified  (DMSFLT)  frequencies. 

Note:  The  DM  filters  were  added  to  the  telemetry  for  IES2  and  subsequent  configurations.  No 
specific  processing  algorithms  or  techniques  have  been  defined  for  this  data.  The 
processing  performed  here  is  based  upon  the  SM  filter  processing.  The  results  are  written 
to  an  ASCII  file  for  post  processing  analysis,  and  not  used  elsewhere  within  the  APGA 
program. 

b.  Inputs. 

1.  Argument  list. 


RESET 

New  satellite/REV  flag 

IDTIME  - 

Data  frame  time 

ICYCLE  - 

Data  frame  cycle  indicator  (1  or  2) 

DMFILT  - 

Array  of  DM  filter  voltages  (cycle  1  only) 

DMOFF  - 

DM  offset  voltage  data 

WB2RNG  - 

DM  wideband  2  range 

VTOT 

COMMON  blocks. 

Total  ion  ram  velocity  (m/s) 

/DMANL/ 

IDMMDE  - 

DM  sensor  mode  indicator  (0  -  9) 

0=Normal;  1-8=H+;  9=FIBA 

/DMCON/ 

DMFBW  - 

DM  filter  comb  bandwidths  (Hz) 

» 

DMFG 

DM  filter  amplifier  gain 

DMFOFF  - 

DM  filter  comb  offset  voltages 

DMVTAB  - 

DM  range  data  table  (volts) 

NDMFLT  - 

Number  of  DM  filter  values 

y 

104 


/LUDIAG/ 


LUFIBA  -  Logical  unit  for  DM  filter  print  file 

c.  Processing. 

1.  On  the  first  call,  invoke  Subroutine  OPNDOF  to  open  the  output  file.  If  the  open  is  not 
successful,  alert  the  user. 

2.  If  the  output  file  is  not  open  or  the  output  has  been  turned  off  (ASCII  =  .FALSE.),  return  to 
Subroutine  DMPRC. 

3.  If  a  reset  has  been  ordered,  write  the  header  record  to  the  output  file. 

4.  Write  the  time,  data  cycle  and  DM  offset  voltages  to  the  output  file. 

5.  If  this  is  an  odd  data  cycle: 

(a)  attempt  to  find  the  WB2  range  sensitivity  bin. 

(b)  if  no  bin  was  found,  there  is  a  WB2  range  error.  Alert  the  user. 

(c)  if  the  WB2  range  is  okay,  calculate  the  PSD  estimates  from  the  DM  filter  data  for  which  the 
bandwidth  is  non-zero  as  follows: 

(1)  calculate  the  RMS  current  variation  offset. 

(2)  calculate  the  RMS  current  variation. 

(3)  calculate  the  RMS  density  variation. 

(4)  calculate  the  PSD  estimates. 

(d)  if  there  is  a  WB2  range  error,  load  the  missing  value  ID  (-1.0  x  1037)  into  the  PSD  array. 

6.  Write  the  DM  mode,  filter  voltages,  and  PSD  estimates  to  the  output  file. 

7.  Return  to  Subroutine  DMPRC. 

d.  Outputs. 

1.  Argument  list. 

None. 

2.  COMMON  blocks. 

/DMANL/ 

DMFPSD  -  Array  of  PSD  estimates. 
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3.  Files. 


IESDMFIBA 

e.  Associated  subroutines. 

1.  Subroutine  OPNDOF.  Open  diagnostic  files  (see  2.4.4.8) 

f.  Interfaces 

1.  Called  from  Subroutine  DMPRC. 

2.  Uses  COMMON  blocks  DMANL,  DMCON,  and  LUDIAG. 


2.4.4.4.7  Subroutine  HPMODE. 


a.  Function. 


Ultimately,  the  function  of  this  subroutine  will  be  to  process  H+  mode  data  from  the  DM  sensor. 
No  specific  processing  algorithms  or  techniques  have  been  defined  for  this  data.  This  subroutine 
merely  reformats  the  input  voltages  and  writes  them  to  an  ASCII  diagnostic  output  file 
(IESDMHPMODE). 


b.  Inputs. 


1.  Argument  list. 

RESET 

IDTIME 

IDMMDE 

IHPCYC 

DMOFF 


New  satellite/REV  flag 

Data  frame  time  (seconds  since  midnight) 

DM  sensor  mode  indicator  (0  -  9) 

0=Normal;  1-8=H+;  9=FIBA 
H+  mode  cycle  counter  (1  -  4) 

DM  sensor  offset  voltages 


2.  COMMON  blocks. 


/LUDIAG/ 

LUDMHP  -  Logical  unit  for  H+  mode  diagnostic  output 


c.  Processing. 

1.  On  first  call,  open  the  output  file  (Subroutine  OPNDOF).  If  a  problem  was  encountered  in 
opening  the  file,  alert  the  user. 

2.  If  this  output  has  been  turned  off  or  the  open  was  not  successful  (ASCI I =. FALSE.),  return  to 
Subroutine  DMPRC. 

3.  If  a  reset,  write  out  the  header. 

4.  Reformat  the  DMOFF  voltages  to  integer  and  write  out  to  the  file. 
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5.  Return  to  Subroutine  DMPRC. 


d.  Outputs. 

1.  Files. 

IESDMHPMODE.  Figure  12  shows  a  sample  of  the  output. 


a:  Time  of  record  (seconds  since  midnight) 
b:  DM  operating  mode 

1:  Low  wiggle,  0.0  volts  starting  potential 
2:  High  wiggle,  0.0  volts  starting  potential 
3:  Low  wiggle,  1.0  volts  starting  potential 
4:  High  wiggle,  1.0  volts  starting  potential 
5:  Low  wiggle,  2.0  volts  starting  potential 
6:  High  wiggle,  2.0  volts  starting  potential 
7:  Low  wiggle,  3.0  volts  starting  potential 
8:  High  wiggle,  3.0  volts  starting  potential 
c:  DM  H+  mode  cycle  counter  (1-4) 
d-o:  H+  mode  data  samples  for  one-data-second  (raw  data) 


Figure  12  Format  and  contents  of  the  DM  H+  mode  output  file 


e.  Associated  subroutines. 

1.  Subroutine  OPNDOF.  Open  diagnostic  output  files  (see  2.4.8.9). 

f.  Interfaces. 

1.  Called  from  Subroutine  DMPRC. 

2.  Uses  COMMON  block  LUDIAG. 
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2.4.4.4.8  Subroutine  DMDIAG. 


a.  Function. 


Construct  diagnostic  output  files  for  the  DM  data  processing  module. 

Inputs. 

1.  Argument  list. 

- 

IDTIME  - 

Time  of  current  data  frame  (seconds  since  midnight) 

MONDSM  - 

DSM  command  from  last  cycle  2  data  frame 

DMOFF  - 

12  offset  voltages  from  the  DM  sensor 

DMLL 

Log-level  voltage  from  DM  sensor: 
cycle  1:  LLA 
cycle  2:  LLB 

DMEQP  - 

DM  equipment  information: 

cycle  1:  DM  offset  voltage  monitor  (volts) 
cycle  2:  DSM  electronics  temperature 

VTOT 

Total  ion  velocity  w.r.t.  satellite  (m/s) 

IDIAG 

2.  COMMON  blocks. 

Diagnostic  print  flag: 

0:  No  diagnostic  output 

1:  Binary  diagnostic  output  only 

2:  ASCII  diagnostic  output  only 

3:  Both  binary  and  ASCII  output 

/DMANL/ 

DMUH 

Horizontal  ion  drift  velocities  (6)  (m/s) 

DMAUH  - 

Average  horizontal  ion  drift  velocity  (m/s) 

DMUV 

Vertical  ion  drift  velocities  (6)  (m/s) 

DMAUV  - 

Average  vertical  ion  drift  velocity  (m/s) 

DMIDEN  - 

Ion  density  (ion/cm3) 

IDMMDE  - 

DM  sensor  mode  (0  -  9) 

0=Normal;  1-8=H+;  9=FIBA 

IDMEF 

DM  analysis  error  flag 

IDMAR 

DM  analysis  results  flag 

/DMCON/ 

DMK1 

Velocity  calculation  constant 

DMAEFF  - 

Effective  area  of  DM  sensor  (cm2) 

DMK2 

Density  calculation  constant 

DMOOFF  - 

Nominal  offset  data  zero  voltage  (volts) 

» 

DMAG 

Gain  of  LLA  amplifier 

DMAOFF  - 

Offset  of  LLA  amplifier  (volts) 

DMBG 

Gain  of  LLB  amplifier 

DMBOFF  - 

Offset  of  LLB  amplifier  (volts) 

ANGMAX  - 

Maximum  allowed  angle-of-arrival  (deg) 

DMSH 

Sign  of  horizontal  velocity  (±1) 
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DMSV 

IDMH 

IDMV 

NOLL 

NOHP 

IDMUR 


Sign  of  vertical  velocity  (±1) 

Location  marker  for  horizontal  velocity  (0  or  1) 
Location  marker  for  vertical  velocity  (0  or  1) 

LL  reliability  flag 
H+  mode  reliability  flag 
RPA  ram  velocity  use  flag 


/LUDIAG/ 


LUDMA  -  Logical  unit  for  ASCII  output 

LUDMB  -  Logical  unit  for  binary  output 

/PROCON/ 

IFLT  -  Satellite  flight  ID 

/SCSOH/ 


DMVO  -  DM  sensor  offset  voltage 


c.  Processing. 

1.  On  first  call  to  this  routine,  open  the  necessary  ASCII  and/or  binary  output  files  (Subroutine 
OPNDOF). 

2.  If  neither  file  could  be  opened,  set  the  diagnostic  print  flag  to  zero  (disabling  the  diagnostic 
output)  and  return  to  Subroutine  DMPRC. 

3.  If  an  ASCII  output  file  is  requested,  then 

(a)  If  a  RESET=.TRUE.  call,  output  the  sensor  processing  constants  and  processing  control 
information  for  the  DM  module. 

(b)  If  the  data  frame  was  good,  write  out  all  data  input  and  produced  in  the  current  invocation  of 
the  DM  processor.  (Note:  If  the  frame  was  bad,  write  out  a  note  to  that  effect). 

4.  If  a  binary  output  file  is  requested,  then  if  the  frame  was  good,  write  the  diagnostic  output  buffer 
to  the  output  file. 

5.  Return  to  Subroutine  DMPRC. 


d.  Outputs. 

IESDMPRT.  ASCII  diagnostic  output  file  (see  Section  4.4.5). 
IESDMDIAG.  Binary  diagnostic  output  file  (see  Section  4.4.5). 

e.  Associated  subroutines. 

1.  Subroutine  OPNDOF.  Open  diagnostic  output  files  (see  2.4.8.9). 

2.  Subroutine  FILERR.  File  error  handling  routine  (see  2.4.8.5). 
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f.  Interfaces. 

1.  Called  from  Subroutine  DMPRC. 

2.  Uses  COMMON  blocks  DMANL,  DMCON,  LUDIAG,  PROCON,  and  SCSOH. 

2.4A.5  Subroutine  MPPRC. 
a.  Function. 


This  routine  is  the  driver  for  the  routines  which  process  data  from  the  on-board  microprocessor 
analyses  of  EP  and  RPA  sweep  data.  Figure  13  is  a  hierarchy  chart  for  this  module.  The  MP  data 
processing  algorithms  are  described  in  Appendix  B.6. 


MPPRC: 

process  microprocessor  (MP)  data 

.  BITON: 

test  for  bit  setting 

.  MPEP: 

process  MP  data  for  EP 

.  .  COPY: 

initialize  array  or  transfer  values  between  arrays 

.  .  UPBITS: 

unpack  bits  from  a  word  into  an  array 

.  .  PRMRNG: 

check  environment  parameters  against  allowed  ranges 

.  MPRPA: 

process  MP  data  for  RPA 

.  .  COPY: 

initialize  array  or  transfer  values  between  arrays 

.  .  UPBITS: 

unpack  bits  from  a  word  into  an  array 

.  .  PRMRNG: 

check  environment  parameters  against  allowed  ranges 

.  MPDIAG: 

report  MP  diagnostics,  and  EPPRC/RPAPRC  comparison 

.  .  BITON: 

test  for  bit  setting 

.  .  OPNDOF: 

initialize  diagnostic  output  file 

. . .  BITON: 

test  for  bit  setting 

.  .  .  FILERR: 

determine  and  report  file  error  status 

.  . .  PRNTON: 

set  PRINTAWAY  status  for  conclusion  of  processing 

.  .  LATLON: 

calculate  latitude  and  longitude  from  orbit  parameters 

Figure  13  MPPRC  module  hierarchy  chart 


b.  Inputs. 

1.  Argument  list. 

NEWSAT 

NEWREV 

GRESET 

THEEND 

IDOMP 


ID  I  AG 


New  satellite  flag 
New  readout  REV  flag 
General  reset  flag 
End-of-data  flag 
MP  data  processing  flag 

0:  Do  not  process  MP  data 
1:  Process  only  MP  EP  analyses 
2:  Process  only  MP  RPA  analyses 
3:  Process  both  EP  and  RPA  analyses 
Diagnostic  output  flag  (see  MPDIAG) 
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2.  COMMON  blocks. 


/D  FRAME/ 

ICCNTR  -  Sweep  clock  program  counter 

IQFRME  -  Data  frame  quality  flag 
MODEP  -  EP  sensor  mode 

c.  Processing. 

1.  If  a  new  satellite  or  REV,  set  a  local  reset  flag. 

2.  If  the  EP  sensor  has  changed  modes,  write  out  a  diagnostic  message,  save  the  new  mode  value,  and 
set  the  local  reset  flag. 

3.  If  the  local  reset  flag  is  set,  then 

(a)  If  a  bad  frame,  return  to  Subroutine  PROCES. 

(b)  If  the  current  frame  is  the  start  of  the  first  full  RPA  sweep  since  the  reset  flag  was  set, 
determine  which  sweep  analyses  are  to  be  processed  and  continue  processing.  Otherwise, 
increment  the  local  frame  counter  and  return  to  Subroutine  PROCES. 

4.  Set  a  local  RPA  sweep-step  counter  from  the  sweep  clock  program  counter. 

5.  Process  the  EP  (Subroutine  MPEP)  and  RPA  (Subroutine  MPRPA)  analyses  as  requested  by  the 
user. 

6.  If  this  is  the  end  of  the  data,  return  to  Subroutine  PROCES. 

7.  If  user-requested,  generate  sweep  analysis  comparison  files  (Subroutine  MPDIAG). 

8.  Turn  off  the  local  reset  flag  and  return  to  Subroutine  PROCES. 

d.  Outputs. 

None. 

e.  Associated  subroutines. 

1.  Function  BITON.  Determine  if  a  specific  bit  in  a  word  is  set  (see  2.4.8.2). 

2.  Subroutine  MPEP.  Process  EP  Sweep  analyses  from  the  on-board  microprocessor  data  (see 

2.4.4.5.1) . 

3.  Subroutine  MPRPA.  Process  RPA  Sweep  analyses  from  the  on-board  microprocessor  data  (see 

2.4.4.5.2) . 

4.  Subroutine  MPDIAG.  Generate  diagnostic  output  files  containing  comparisons  of  MP  and  ground 
analyses  of  EP  and  RPA  sweeps  (see  2.4.4.5.3). 
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f.  Interfaces. 

1.  Called  from  Subroutine  PROCES. 

2.  Uses  COMMON  block  DFRAME. 


2.4.4.5.1  Subroutine  MPEP. 

a.  Function. 

Process  EP  sweep  analysis  results  from  the  on-board  microprocessor. 

b.  Inputs. 

1.  Argument  list. 

RESET  -  Local  reset  flag  (see  MPPRC) 

THEEND  -  End-of-data  flag 

MPCNT  -  RPA  sweep-step  counter  (see  MPPRC) 

2.  COMMON  blocks. 

/DFRAME/ 

IDTIME  -  Time  of  current  data  frame  (seconds  since  midnight) 

ICYCLE  -  Data  frame  cycle  ID  (1  or  2) 

ICCNTR  -  Sweep  program  counter 

IQFRME  -  Data  frame  quality  flag 

IEPFLG  -  MP  analysis  results  flags  cycle  1:  EP  sweep 

VBIAS  -  Vbias  voltage 

ELMP  -  MPEP  sweep  analysis  results 

cycle  1:  Electron  temperature 
cycle  2:  Electron  density 
VPEL  -  MP  EP  satellite  potential  results 

c.  Processing. 

1.  If  a  reset  call,  reset  all  local  flags/counters. 

2.  If  COMMON  MPEANL  contains  an  old  analysis,  reinitialize  it. 

3.  If  the  data  frame  is  bad,  or  if  both  cycle  1  and  cycle  2  data  for  the  current  sweep  have  been 
collected,  or  if  there  are  no  more  data,  jump  down  to  step  9. 

4.  Determine  the  status  of  the  EP  sensor  and  the  location  in  the  sweep  program  as  follows: 

(a)  If  a  cycle  1  data  frame,  extract  the  bits  from  the  data  frame  ID  word  which  indicate  (1)  if  the 
EP  sensor  is  in  a  calibration  sweep,  (2)  if  the  EP  sensor  is  in  a  DC  mode,  and  (3)  if  the  EP 
sensor  is  in  mode  E  (short  sweeps). 

(b)  Use  the  sensor  status  information  to  set  the  number  of  data  frames  available  to  extract  data 
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for  the  current  sweep. 

(c)  If  in  a  DC  mode  (C  or  D),  determine  if  a  sweep  is  currently  in  progress  and  if  there  was  a 
sweep  in  progress  previously  for  which  an  analysis  may  be  available. 

5.  If  the  sensor  is  in  a  DC  mode,  and  there  was  no  previous  sweep  for  which  an  analysis  is  available, 
return  to  Subroutine  MPPRC. 

6.  If  the  time  for  the  current  EP  sweep  analysis  has  not  been  determined,  calculate  the  sweep  center 
time. 

7.  If  the  current  data  frame  is  cycle  1  and  the  MP  EP  analysis  data  from  cycle  1  have  not  yet  been 
extracted,  then  save  the  electron  temperature  measurement,  calculate  the  satellite  potential  from 
the  sensor  potential  reported  from  the  MP  EP  analysis,  and  separate  out  the  bits  from  the  MP  EP 
analysis  results  word. 

8.  If  the  current  data  frame  is  cycle  2  and  the  MP  EP  analysis  data  from  cycle  2  have  not  yet  been 
extracted,  then  save  the  electron  density  parameter. 

9.  If  we  are  at  the  end  of  a  read  interval  (as  set  by  the  length-of-sweep  variable),  then: 

(a)  If  the  electron  density  parameter  was  found,  calculate  the  electron  density  using  the  electron 
temperature  if  it  is  available,  or  an  electron  temperature  of  2000°  K  if  it  is  not. 

(b)  Check  the  ranges  of  the  analysis  parameters  found. 

(c)  Set  the  analysis  results  flag  to  1  if  any  good  analysis  results  were  found. 

(d)  Reset  the  data-acquired  flags  for  the  next  go-around. 

10.  Return  to  Subroutine  MPPRC. 


d.  Outputs. 


1.  COMMON  blocks. 


/MPEANL/ 


METIME 

MPEFLG 

EDENMP 

ETMP 

SPEPMP 

IMPEAR 


EP  sweep  center  time  (seconds  since  midnight) 
MP  EP  sweep  analysis  error  flags 
MP  EP  electron  density  (el/cm3) 

MP  EP  electron  temperature  (°K) 

MP  EP  satellite  potential  (volts) 

MP  EP  sweep  analysis  results  flag 


e.  Associated  subroutines. 


1.  Function  BITON.  Determine  if  a  specific  bit  in  a  word  is  set  (see  2.4.8.2). 

2.  Function  PRMRNG.  Determine  if  a  calculated  parameter  is  within  acceptable  range  (see 
2.4.8.10). 
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3.  Subroutine  UPBITS.  Unpack  the  bits  from  a  word  and  transfer  them  to  an  array  (see  2.4.8.13). 


f.  Interfaces. 

1.  Called  from  Subroutine  MPPRC. 

2.  Uses  COMMON  blocks  D FRAME  and  MPEANL. 


2.4.4.5.2  Subroutine  MPRPA 
a.  Function. 


Process  RPA  sweep  analysis  results  from  the  on-board  microprocessor. 


b.  Inputs. 

1.  Argument  list. 

RESET 
THEEND  - 
MPCNT  - 

2.  COMMON  blocks. 

/D  FRAME/ 

IDTIME  - 
ICYCLE  - 
IQFRME  - 
INPFLG  - 

VAPER 

HIMP 


OIMP 


VSP 

VPION 

c.  Processing. 


Local  reset  flag  (see  MPPRC) 
End-of-data  flag 

RPA  sweep-step  counter  (see  MPPRC) 


Time  of  current  data  frame  (seconds  since  midnight) 
Data  frame  cycle  ID  (1  or  2) 

Data  frame  quality  flag 
MP  analysis  results  flags 

cycle  2:  RPA  sweep 
Vbias  +  V,P  (volts) 

MP  RPA  sweep  analysis  results 

cycle  1:  Light  ion  temperature 
cycle  2:  Light  ion  density 
MP  RPA  sweep  analysis  results 

cycle  1:  0+  ion  temperature 
cycle  2:  0+  ion  density 
MP  RPA  ram  drift  velocity 
MP  RPA  satellite  potential  results 


1.  If  a  reset  call,  reset  all  local  flags/counters. 

2.  If  COMMON  MPIANL  contains  an  old  analysis,  reinitialize  it. 

3.  If  the  data  frame  is  bad,  or  if  both  cycle  1  and  cycle  2  data  for  the  current  sweep  have  been 
collected,  or  if  there  are  no  more  data,  jump  down  to  step  7. 

4.  If  the  time  for  the  current  RPA  sweep  analysis  has  not  been  determined,  calculate  the  sweep 
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center  time. 


5.  If  the  current  data  frame  is  cycle  1  and  the  MP  RPA  analysis  data  from  cycle  1  have  not  yet  been 
extracted,  then  save  the  0+  and  light  ion  temperatures. 

6.  If  the  current  data  frame  is  cycle  2  and  the  MP  RPA  analysis  data  from  cycle  2  have  not  yet  been 
extracted,  then  save  the  0+  and  light  ion  densities  and  the  ion  ram  drift  velocity,  calculate  the 
satellite  potential  from  the  sensor  potential  reported  from  the  MP  RPA  analysis  and  the  Vbias 
value  saved  from  a  previous  data  frame,  save  the  current  Vbias  readings,  separate  out  the  bits  from 
the  MP  RPA  analysis  results  word,  and  set  the  light-ion  flag  word. 

7.  If  we  are  at  the  end  of  a  read  interval  (as  set  by  the  length-of-sweep  variable),  then 

(a)  Check  the  ranges  of  the  analysis  parameters  found. 

(b)  Set  the  analysis  results  flag  to  1  if  any  good  analysis  results  were  found. 

(c)  Reset  the  data-acquired  flags  for  the  next  go-around. 

8.  Return  to  Subroutine  MPPRC. 

d.  Outputs. 


COMMON  blocks. 

/MPIANL/ 

MITIME  - 
MPIFLG  - 
ODENMP  - 

RPA  sweep  center  time  (seconds  since  midnight) 
MP  RPA  sweep  analysis  error  flags  (10) 

MP  RPA  0+  density  (ion/cm3) 

OTMP 

MP  RPA  0+  temperature  (°K) 

HDENMP  - 

MP  RPA  light  ion  density  (ion/cm3) 

HTMP 

MP  RPA  light  ion  temperature  (°K) 

IMPLIF 

MP  RPA  light  ion  flag 

URMP 

MP  RPA  ram  ion  drift  velocity  (m/s) 

SPRPMP  - 

MP  RPA  satellite  potential  (volts) 

IMPIAR  - 

MP  RPA  analysis  results  flag 

e.  Associated  subroutines. 

1.  Function  BITON.  Determine  if  a  specific  bit  in  a  word  is  set  (see  2.4.8.2). 

2.  Function  PRMRNG.  Determine  if  a  calculated  parameter  is  within  acceptable  range  (see 
2.4.8.10). 

3.  Subroutine  UPBITS.  Unpack  the  bits  from  a  word  and  transfer  them  to  an  array  (see  2.4.8.13). 

f.  Interfaces. 

1.  Called  from  Subroutine  MPPRC. 

2.  Uses  COMMON  blocks  DFRAME  and  MPIANL. 
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2.4.4.5.3  Subroutine  MPDIAG 

a.  Function. 

Build  ASCII  format  diagnostic  output  files  containing  comparisons  of  the  results  of  EP  and  RPA 
sweep  analysis  from  modules  EPPRC  and  RPAPRC  with  the  results  obtained  by  the  on-board 
microprocessor  analyses  of  the  same  sweeps.  The  output  goes  to  files  IESMPEPPRT  and 
IESMPRPAPRT.  This  output  may  be  transferred  to  the  standard  HSP  file  by  Subroutine 
SUMOUT  if  requested  by  the  user  (see  2.4.6). 

b.  Inputs. 

1.  Argument  list. 


RESET 

IDIAG 

Local  reset  flag  (see  MPPRC) 

Diagnostic  output  flag: 

0:  Do  not  generate  diagnostic  output  files 
1:  Generate  an  RPA  sweep  analysis  file 

2:  Generate  an  EP  sweep  analysis  file 

3:  Generate  both  files 

COMMON  blocks. 

/EPANL/ 

IEPTIM  - 
EPEDEN  - 
EPETMP  - 
EPVPOT  - 
IEPAR 

Sweep  center  time  (seconds  since  midnight) 

DC  mode  electron  density  (24,  el/cm3) 

Electron  temperature  (°K) 

Satellite  potential  (volts) 

EP  analysis  results  flag 

/LUDIAG/ 

LUMPEP  - 
LUMPRP  - 

Logical  unit  for  file  IESMPEPPRT 

Logical  unit  for  file  IESMPRPAPRT 

/MPEANL/ 

METIME  - 
MPEFLG  - 
EDENMP  - 
ETMP 

SPEPMP  - 
IMPEAR  - 

EP  sweep  center  time  (seconds  since  midnight) 

MP  EP  sweep  analysis  error  flags 

MP  EP  electron  density  (el/cm3) 

MP  EP  electron  temperature  (°K) 

MP  EP  satellite  potential  (volts) 

MP  EP  sweep  analysis  results  flag 

/MPIANL/ 

MITIME  - 
MPIFLG  - 
ODENMP  - 
OTMP 

RPA  sweep  center  time  (seconds  since  midnight) 
MP  RPA  sweep  analysis  error  flags  (10) 

MP  RPA  0+  density  (ion/cm3) 

MP  RPA  0+  temperature  (°K) 
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HDENMP  - 

MP  RPA  light  ion  density  (ion/cm2 3 4) 

HTMP 

MP  RPA  light  ion  temperature  (°K) 

IMPLIF 

MP  RPA  light  ion  flag 

URMP 

MP  RPA  ram  ion  drift  velocity  (m/s) 

SPRPMP  - 

MP  RPA  satellite  potential  (volts) 

IMPIAR  - 

MP  RPA  analysis  results  flag 

/RPAANL/ 

IRPTIM  - 

Center  time  of  sweep  (seconds  since  midnight) 

RPHDEN  - 

Light  ion  density  (ion/cm3) 

RPODEN  - 

0+  ion  density  (ion/cm3) 

RPEDEN  - 

Total  ion  density  (ion/cm3) 

RPITMP  - 

Ion  temperature  (deg  K) 

IRPLIF 

Light  ion  flag 

RPAUR  - 

Ram  ion  drift  velocity  (m/s) 

RPVPOT  - 

Satellite  potential  (volts) 

IRPAR 

RPA  analysis  results  flag 

/SATEPH/ 

ITCKL 

Times  for  CkL  analyses  (8)  (seconds  since  midnight) 

c.  Processing. 

1.  If  a  reset  call,  determine  which  output  files  need  to  be  built.  If  they  have  not  already  been 
opened,  open  them  (Subroutine  OPNDOF).  If  they  are  open  already,  write  a  new  header  line  to 
the  file(s).  If  either  file  could  not  be  opened,  write  out  a  diagnostic  warning  and  set  the  file 
output  flag  to  .FALSE,  to  disable  the  generation  of  that  file. 

2.  If  an  EP  or  RPA  sweep  analysis  is  available  in  the  EPANL  or  RPAANL  COMMON  blocks,  save 
it  for  comparison  with  the  MP  analysis. 

3.  If  an  MP  EP  sweep  analysis  is  available  and  the  EP  comparison  file  is  to  be  built,  then: 

(a)  Calculate  the  GMT  time  and  the  satellite  location  (Subroutine  LATLON)  for  the  output  file. 

(b)  Check  both  sections  of  the  EPPRC  EP  sweep  analysis  save  array  for  the  EP  sweep 
corresponding  to  the  MP  EP  sweep  analysis  just  received.  If  no  match  is  found,  write  the  MP 
EP  analysis  results  to  the  diagnostic  output  file.  If  a  match  is  found,  calculate  the  comparison 
values  (MP-to-EPPRC  ratio  for  density  and  temperature,  MP-minus-EPPRC  difference  for 
satellite  potential)  and  write  the  MP  EP  analysis  results  and  the  comparison  values  to  the 
diagnostic  output  file. 

4.  If  an  MP  RPA  sweep  analysis  is  available  and  the  RPA  comparison  file  is  to  be  built,  then: 

(a)  Calculate  the  GMT  time  and  the  satellite  location  (Subroutine  LATLON)  for  the  output  file. 

(b)  Check  both  sections  of  the  RPAPRC  RPA  sweep  analysis  save  array  for  the  RPA  sweep 
corresponding  to  the  MP  RPA  sweep  analysis  just  received.  If  no  match  is  found,  write  the 
MP  RPA  analysis  results  to  the  diagnostic  output  file.  If  a  match  is  found,  calculate  the 
comparison  values  (MP-to-RPAPRC  ratio  for  densities  and  temperature,  MP-minus-RPAPRC 
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difference  for  satellite  potential  and  ion  drift  velocity)  and  write  the  MP  RPA  analysis  results 
and  the  comparison  values  to  the  diagnostic  output  file. 

5.  Return  to  Subroutine  MPPRC. 

d.  Outputs. 

1.  Files. 

IESMPEPPRT.  Figure  14a  is  a  sample  of  the  output  written  to  this  file.  The  items  in  the 
various  columns  are  described  in  Table  1. 

IESMPRPAPRT.  Figure  14b  is  a  sample  of  the  output  written  to  this  file.  The  items  in  the 
various  columns  are  described  in  Table  1. 

e.  Associated  subroutines. 

1.  Function  BITON.  Determine  if  a  specific  bit  in  a  word  is  set  (see  2.4.8.2). 

2.  Subroutine  LATLON.  Calculate  the  geographic  latitude  and  longitude  of  the  satellite  for  an  input 
time  (see  2.4.8.7). 

3.  Subroutine  OPNDOF.  Open  a  diagnostic  output  file  (see  2.4.8.9). 

f.  Interfaces. 

1.  Called  from  Subroutine  MPPRA. 

2.  Uses  COMMON  blocks  EPANL,  LUDIAG,  MPEANL,  MPIANL,  RPAANL,  and  SATEPH. 


2.4.4.6  Subroutine  CKLPRC. 

a.  Function. 

Calculate  an  estimate  of  the  height-integrated  irregularity  strength,  CkL,  using  high-resolution  N| 
data  from  the  SM  sensor  or  Nc  data  from  the  EP  sensor  (modes  C,  D,  or  DS  only),  and  the  filter 
PDS  data  from  the  SM  sensor.  A  description  of  the  theory  on  which  this  calculation  is  based  can 
be  found  in  Appendix  B.5.  Figure  15  is  a  hierarchy  chart  for  this  module. 

b.  Inputs. 


1.  Argument  list. 

NEWSAT  - 

New  satellite  flag 

NEWREV  - 

New  readout  REV  flag 

GRESET  - 

General  reset  flag 

THEEND  - 

End-of-data  flag 

IDOCKL  - 

CkL  processing  control  flag 

0:  Do  not  calculate 

>1:  Calculate  CkL 

IDIAG 

CkL  diagnostic  print  switch 
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*  o  o  o 
»  o  o  o 
>  o  o  o 
*000 
1  o  o  o 
I  o  o  o 
1000 
>000 
1000 


********** 

********** 

********** 

********** 

********** 

********** 

********** 


********** 

********** 

********** 

********** 

********** 

********** 


********** 

********** 

********** 

********** 

********** 

********** 

********** 

********** 


•  O  O  O  CO  N-  so 


O'  0  O'  O'  O'  O'  CO  CO  CO  CO 


in  oj  o  co  in  m  - 


'OO'jcow'OO'jcoro 

o  r-  w  f\J  Km  M 

0000000000 

0000000000 

COCOCOCOCOCOCOCOCOCO 

0000000000 


Figure  14a  IESMPEPPRT  sample  output  listing 
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REV  00000,  WX2546  I  HEAVY  ION 


(OOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOO 

>0000000000000000000000000000000000 

>0000000000000000000000000000000000 

>0000000000000000000000000000000000 

>0000000000000000000000000000000000 

<*-T-0000000000<—  *-«^-00OT-0*-0T-00O00r-000O0 
O  O  O  » —  O  O  O  O  « —  OOOO*-  OO*-  0«—  OO*-  O*—  *-  0»“* —  «—  «r—  O 

>ooooooooooooo»— ooooo*~oooooooooo*--o*-o 

>0000000000000000000000000000000000 


*  cm  *  o  *  co  cm  >4  *  -O  *  *  *  *  «  cm  *  *  *  *  *  cm  *  cm  *  *  *  *  *  *  *co 

*"4*N-*f''-'0'0*CM*****>0*****'0*0'*******h- 

*  •  *  •  *  •  ■  •  *  .****♦  ******  .*  ********  . 

♦  0*N-*0'N-N.*N-*****|s-*****'0*'0*******aO 

♦  (M*1*—  *<r~*—  *—*«—*****«■—  *****«—*»—  *♦*****«— 

*  1*  »*  •  •  •*  I*****  !««***  I*  I*******  I 

*  *  *  *  *****  *****  *  ******* 


•  *  •  *  •••*  ******  ******  .*  ********  «* 

o*  o*  000*  o*  *  *  *  *  o*  *  *  *  *  o*  o*  *  *  *  *  *  *  o* 

CM*'0*'0CMO*'0*****<r*****s0*CM*  ******  -*4  * 

in  ♦  «—  *  m  cO  *  «“  *****  'O  *****  N-  *  in  *******  * 

•  *  «••<«  *****(*****  *  *******  * 

*  *  *  *****  *****  «  *******  * 

«  «  «  *****  *****  *  *******  « 


o  00  o  00  0000  o  00 

•  *  •  *  •*«**  •••*«*  •*  «*  •**  •**  ******* 

o*  o*  o*  *  *  *  000*  *  *  o*  o*  o*  *  o*  *  o*  *  *  *  *  * 

^  *  co*  co*  *  *  *  vr  vr  o  *  *  *  >o  *  cm  *  co  *  *  o*  *  >o  *  *  *  *  *  * 

T~*  CM*  r-  *  *  *  *  CO  Kl  CM  *  *  *  in*  m  *  *  *  in  *  *  o*  *  *  *  *  * 

*  *  *  *  *  *  cm  in  O  *  *  *  co*  m  *  cm*  *  **»-****** 

*  *  ****  ***  *  *  **  **  ****** 


O  -4 

3 

0  vr 

CM 

O 

O 

O  O 

O  O 

0  0 

O 

O 

O  O 

0  >o 

0 

0  0 

•4 

O 

O 

>4  O 

<r  ^  *  m  *  vf  *  rocvicM*  cm  vf  >4  -4  *  *  c\j  sf  *  *  *4  cm  *  sr  *  *  ^4  *  *  *  *  to* 

4  4*  4  *  4-*  *4-**  4  4  +  4-  *  *  44*  4-*  44-*  4  *  *  4  *  *  *  *  4* 

UI  UJ  *  UJ  *  Ul*  UJ  UJ  UJ  *  UJUJLUUJ*  *  LUUJ*  UJ  *  UJ  Ui  *  Ui*  *  UJ*  *  *  *  UJ  * 

inin*  in  *  m  *  m  «—  «—  *  o  o  tv.  *  *  t-  m  *  o*  *-  *—  *  0*  *  *  *  *  *  *4  * 

O  m  *  K  *  cm*  moo*  o  O  >0  in  *  *  or^*  O'  *  mo*  o*  *  cm*  *  *  *  N  * 

.  •*  •  *  •*  ...*  ....**  .  .  *  •  *  ••*  •**  •««*«  .  * 

CM  m  *  m  *  *  o  m  m  *  m-4-cMCM*  *  m  cm  *  *4  *  cm  m  *  «—  *  *  m*  *  *  *  *—  * 

***  *  *  *  **  ******** 


♦ . ***  ...*  •  *  . * . 

*  0000000000*  *  *  000*  o  *  o  *  00000*  000000 

*  'OCO<MO*4000'OlM*  *  *  O  CM  O  *  O  *  CO*  <00(M(00«  O  O  (\J  <0  sf 

*  (\J(\JfO'OOr-<oo>K)tO*  *  *  -O  in  O  *  N.  *  r-.  *  o  in  m  m  co  *  sj'OfMCM'Oro 

*  CM  CM«r-«-  CM  ***  ***mm  *  CM  «- 

*  ***  ***  * 


*  *  '4'4'4*'4"4'4'4'4>4'4*  *  *  >4  «*4  *  >4  *  -4-*  vj  vj  V?  Sf  st  *  "4  >4  -4  **4  «4  >4 

*  *  4444444444***  444*  4*  4*  44444*  444444 

*  *  lUUJUJUIUJUIUJUIUIUI*  *  *  UJ  IU  UJ  *  UJ  *  lit*  UJ  UJ  UJ  UJ  UJ  *  UJ  UJ  UJ  UJ  UI  UJ 

*  *  inpin«-0'COO'(M(vis*  *  *  in  cm  o  *  m*  o  *  m  o  o  in  cm  *  o>Ko 

*  *  ON-O-4'OmOOOO*  *  *  <400*  VO  *  O  *  o  O  O  O  CO  *  O'  «4  CM  CM  in  *4  *o 

*  * . ***  ...*  •«  . . * . 

*  *  (\l  r*  W  r- (M  1- to  to  K1  *  *  *  CM  K»  fO  *  CM  *  CM  *  m  CM  CM  CM  CM  «  CM  tO  M  CM  CM  N 

*  *  *  *  *  *  *  *  * 


0'C0<0N'0C0NS’0in^'ff0W»”r-O0'C0C00'C0C0N'0'0m'tt0t0<Mr-« 


SSNSSSNNNNNNNSSNh.vO^vO'O'O'O'O'O’O'O'O'O'O'O'O'O'Oin 

*4'4*'4’4'4'4'4*4>4'4'4'4N4'4'4'4,4'4*4vj,>4*4'4>4'4N4>4>4*4'4'4N4N4Na-N4 

r0T-0'N't«-ONinwoc0int0'-0"0^fM0"0'jfMONinr0Oc0'0MT-oNNt 

^^ooooO'O'O'O'OcococooDN-N-r^N.'O'O'O'O'Ommmmvfvf'^r-sj-mmm 

vfOOfVJ'OOsfCOfVJ'OO'JCOfVJ'OO'fCOfM'OO'JCOfVJ'OO'JCOOJ'OO'tCOfVJ'OO 

mm^^ininmoo*— *-t~cM(MmmrO'4'4inininoo«--<r-«-CMCMmrom'4-4in 

r-  w-  t—  *—cMCMCM(MCMcMcMCMCMcMCMCMrMCMCMmmmmmmmmmmmmm 

S22SSSS2222900000000000000000000000 

COCOCOCOCOCOCOCOCOCOCOCOCOCOCOCOCOCOCOCOCOCOCOCOCOCOCOCOCOCOCOCOCOCOCO 

00000000000000000000000000000000000 


Figure  14b  IESMPRPAPRT  sample  output  listing 


120 


(labels  a-q  cross-reference  to  Table  2-01. 


Table  1  Contents  of  MP  sweep  analyses  comparison  output  files  (IESMPEPPRT  and  1ESMPRPAPRT) 


EP  Sweep  Analyses  Comparison  File 
(Labels  cross-reference  to  Figure  14a) 


Label  Description 

a.  Time  of  sweep  analysis  (HHMMSS,  GMT) 

b.  Geographic  latitude  of  sweep  analysis 

c.  Geographic  longitude  of  sweep  analysis 

d.  Electron  density  from  MP  analysis 

e.  Ratio  of  MP  density  to  ground  processed  density 

f.  Electron  temperature  from  MP  analysis 

g.  Ratio  of  MP  temperature  to  ground  processed  temperature 

h.  Spacecraft  potential  from  MP  analysis 

i.  MP  analysis  spacecraft  potential  minus  ground  processed  spacecraft  analysis 

j.  MP  analysis  status/warning  flags  (see  Volume  1,  Technical  Description,  Appendix  A: 

SSIES  data  frame  word  80,  cycle  1  for  description) 

RPA  Sweep  Analyses  Comparison  file 
(Labels  cross-reference  to  Figure  14b) 

Label  Description 

a.  Time  of  sweep  analysis  (HHMMSS,  GMT) 

b.  Geographic  latitude  of  sweep  analysis 

c.  Geographic  longitude  of  sweep  analysis 

d.  04-  density  from  MP  analysis 

e.  Ratio  of  MP  density  to  ground  processed  density 

f.  0+  temperature  from  MP  analysis 

g.  Ratio  of  MP  temperature  to  ground  processed  temperature 

h.  H+/He+  density  from  MP  analysis 

i.  Ratio  of  MP  density  to  ground  processed  density 

j.  H+/He+  temperature  from  MP  analysis 

k.  Ratio  of  MP  temperature  to  ground  processed  0+  temperature 

l.  Ram  ion  drift  velocity  from  MP  analysis 

m.  MP  analysis  ram  velocity  minus  ground  processed  ram  velocity 

n.  Spacecraft  potential  from  MP  analysis 

o.  MP  analysis  spacecraft  potential  minus  ground  processed  spacecraft  analysis 

p.  MP  analysis  status/warning  flags  (see  Volume  1,  Technical  Description,  Appendix  A: 

SSIES  data  frame  word  80,  cycle  2  for  description) 

q.  Light  ion  flag  from  ground  processing  results 

1:  H+,  2:  He+. 


ISWCKL  -  Data  use  switch 

1:  Use  SM  density  data 

2:  Use  SM  density  and  filter  data 

3:  Use  EP  mode  C  or  D  density  data 
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CKLPRC: 

.  BITON: 

.  CKLSAV: 

.  .  COPY: 

.  PRNTON: 

.  COPY: 

.  CKLPRP: 

.  .  DENFIX: 

.  .  DETRND: 

.  .  .  COPY: 

.  ENVMOD: 

.  .  ERF: 

.  BLDPDS: 

.  .  DENPDS: 

.  .  .  WINDOW: 
....  COPY: 

.  .  .  FFT: 

....  FR2TR: 
....  FR4TR: 
....  FORD1: 
....  FORD2: 

.  .  .  BSMOO: 

.  .  .  COPY: 

.  .  FILPDS: 

.  TANDP: 

.  .  LSF: 

.  PRMRNG: 

.  DVAVE: 

.  CVEFF: 

.  .  CTRANS: 

.  .  MAGFLD: 

.  .  .  IGRF: 

.  .  CM  AT: 

.  CK: 

.  CKDIAG: 

.  .  OPNDOF: 

.  .  .  BITON: 

.  .  .  FILERR: 

.  .  .  PRNTON: 

.  .  FILERR: 


perform  calculations  for  CkL  analysis 

test  for  bit  setting 

collect  density  and  SM  filter  data 

initialize  or  transfer  values  between  arrays 

set  PRINTAWAY  status  for  end  of  processing 

initialize  or  transfer  values  between  arrays 

prepare  plasma  density  data  for  CkL  calculation 

interpolate  for  missing  density  data  values 

detrend  data  and  compute  RMS 

initialize  or  transfer  values  between  arrays 

calculate  ionospheric  model  irregularity  parameters 

error  function  for  Gaussian  distribution 

calculate  power  spectrum  from  density  and  filter  values 

compute  FFT  of  detrended  density  data 

calculate  FFT  windowing  weight  factors 

initialize  or  transfer  values  between  arrays 

interface  to  IEEE  FFT  routines 

IEEE  radix  2  iteration  routine 

IEEE  radix  4  iteration  routine 

IEEE  in-place  reordering  routine 

IEEE  in-place  reordering  routine 

perform  binomial  weight  smoothing  for  data 

initialize  or  transfer  values  between  arrays 

compute  power  spectrum  from  SM  filter  data 

calculate  Tt  and  pk  from  power  spectrum 

perform  linear  least-squares  fit 

check  parameters  against  allowed  ranges 

compute  average  values  of  ion  drift  velocity 

calculate  effective  spacecraft  velocity  relative  to  irregularities 

transform  between  spacecraft  and  geographic  coordinates 

calculate  magnetic  field  from  model 

initialize  coefficients  for  IGRF  1990  model 

construct  transformation  matrix  for  irregularity  coordinates 

compute  the  Ck  irregularity  parameter  estimate 

report  CkL  processing  diagnostics 

initialize  diagnostic  output  file 

test  for  bit  setting 

determine  and  report  file  error  status 

set  PRINTAWAY  status  for  end  of  processing 

determine  and  report  file  error  status 


Figure  15  CKLPRC  module  hierarchy  chart 


2.  COMMON  blocks. 


/CKLCON/ 

RMSLIM  -  (RMS  AN)/N  cutoff  for  CkL  calculation  (%) 

FL  -  Lowest  frequency  for  linear  PDS  fit  (Hz) 

FU  -  Highest  frequency  for  linear  PDS  fit  (Hz) 
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MODP1 


FILFAC  - 
FFTNF 
IWNDOW  - 
IDTRND  - 


LSFPDS  - 


LOCK 

ICKLU 


CKLKP 

/DFRAME/ 

IDTIME  - 
IQFRME  - 
MODEP  - 

/EDRREC/ 

NPTEDR  - 
EDRBUF  - 

/EPANL/ 

EPEDEN  - 
IEPAR 

/SATEPH/ 

ITCKL 

IDAY 

GLAT 

APXLAT  - 

APXLT 

VSC 

ORBINC  - 
PHIO 

/SMANL/ 

SMIDEN  - 
SMFPDS  - 
ISMAR 


Model  p,  use  flag 

0:  Use  only  if  calculated  p,  is  bad 
1:  Use  at  all  times 
Filter  output  adjustment  factor 
Noise  floor  for  FFT  section  of  PDS 
FFT  window  taper  flag  (0-10) 

Detrend  flag 

0:  detrend 
1:  do  not  detrend 
PDS  to  use  in  log-linear  fit 
0:  full  PDS 
1:  decimated  PDS 
Scale  size  for  CkL  calculation  (m) 

Ion  drift  velocity  use  flag 

0:  use  no  ion  drift  velocity  in  VTOT 
1:  use  no  ram  drift  velocity  in  VTOT 
2:  use  all  ion  drift  velocity 
Nominal  K,,  value  to  use  in  models 


Data  frame  time  (sec  since  midnight) 
Data  frame  quality  flag 
EP  sensor  mode 


EDR  buffer  pointer 
EDR  buffer 


EP  electron  density  (el/cm3) 
EP  analysis  results  flag 


Seconds  since  midnight 
Day-of-year 

Geographic  latitude  (deg) 

Apex  latitude  (deg) 

Apex  local  time  (decimal  hours) 

Orbital  velocity  of  satellite  (m/s) 

Inclination  of  satellite  orbit  (rad) 

Angle  from  ascending  node  at  ITCKL(l)  (rad) 


SM  ion  density  (ion/cm3) 

SM  filter  power  spectrum  ((ion/cm3)2/Hz) 
SM  analysis  results  flag 
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/SMCON/ 


SMFFRQ  -  Center  frequencies  of  the  SM  filters  (Hz) 

SMFBW  -  Bandwidth  (-6dB  points)  of  the  SM  filters  (Hz) 

NSMFLT  -  Number  of  SM  filters 

c.  Processing. 

1.  If  a  new  satellite  or  readout  REV,  reset  all  processing  flags. 

2.  Save  the  data  to  be  used  in  the  calculation,  SM  N,  or  EP  Nc  data  (Subroutine  CKLSAV).  If  the 
selected  data  are  not  available,  alert  the  user. 

3.  If  less  than  22  seconds  of  data  have  been  collected,  return  to  Subroutine  PROCES. 

4.  If  the  current  QL  calculation  is  to  be  skipped,  return  to  Subroutine  PROCES. 

5.  Prepare  the  density  data  for  the  CkL  calculation  as  follows  (Subroutine  CKLPRP): 

(a)  Correct  for  missing  data  where  possible. 

(b)  Detrend  the  data  (quadratic  trend  removal). 

(c)  Calculate  the  RMS  AN  and  (RMS  AN)/N  for  the  center  half  of  the  data  set. 

6.  If  the  data  cannot  be  used  to  calculate  CkL  due  to  missing  data,  or  if  the  (RMS  AN)/N  calculated 
is  below  the  user  selected  limit  for  a  CkL  calculation,  jump  to  step  15. 

7.  Determine  the  index  to  use  for  the  arrays  in  COMMON  SATEPH. 

8.  Calculate  irregularity  model  parameters  a,  b,  6,  L,  and  plm  (Subroutine  ENVMOD). 

9.  Construct  the  power  density  spectrum  (PDS)  and  the  decimated  PDS  (DPDS)  (Subroutine 
BLDPDS). 

10.  Calculate  T,  and  p,  from  the  PDS  (Subroutine  TANDP). 

11.  If  the  user  has  specified  that  a  model  p,  be  used  to  calculate  CkL,  set  p,  to  the  model  value,  plro. 

12.  If  Tj  or  pk  is  out-of-range,  return  to  Subroutine  PROCES  without  calculating  CkL. 

13.  Calculate  the  average  ion  drift  velocities  for  the  center  10-second  period  of  the  21.333...  second 
sample  (512  data  points)  used  in  calculating  CkL  (Subroutine  DVAVE)  and  calculate  the  effective 
scan  velocity,  Vefr  (Function  CVEFF). 

14.  Calculate  (Function  CK)  and  error-check  (Function  PRMRNG)  a  CkL  value  from  T„  p„  and  Ve(r. 

15.  Generate  diagnostic  output  if  requested  (Subroutine  CKDIAG). 

16.  Return  to  Subroutine  PROCES. 
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d.  Outputs. 

1.  COMMON  blocks. 


/CKLANL/ 

DNON 

(RMS  AN)/N  (%) 

CKL 

Height-integrated  irregularity  strength  (CkL) 

T1 

Value  of  log-linear  PDS  fit  at  f=lHz 

PI 

Slope  of  log-linear  PDS  fit 

DFREQ  - 

Frequencies  in  decimated  PDS  (Hz) 

DPDS 

Decimated  power  density  spectrum 

NCKLG  - 

Number  of  successful  CkL  calculations 

NCKLT 

Number  of  CkL  calculations  attempted 

ICKLEF  - 

QL  processing  error  flag 

ICKLAR  - 

QL  analysis  results  flag 

e.  Associated  subroutines. 

1.  Subroutine  CKLSAV.  Save  the  high-resolution  density  data  and  the  SM  filter  data  for  calculation 
of  CkL  (see  2.4.4.6.1). 

2.  Subroutine  CKLPRP.  Prepare  the  high-resolution  density  data  for  calculation  of  CkL  (see 
2.4.4.6.2). 

3.  Subroutine  ENVMOD.  Calculate  model  values  for  irregularity  parameters  a,  b,  6,  L,  and  p,  (see 
2.4.4.6.5). 

4.  Subroutine  BLDPDS.  Construct  a  power  spectral  density  function  from  the  high-resolution 
density  data  and  the  SM  filter  data  (see  2.4. 4.6.6). 

5.  Subroutine  TANDP.  Calculate  T,  and  p,  from  the  PDS  (see  2.4.4.6.12). 

6.  Function  PRMRNG.  Determine  if  a  parameter  is  within  allowed  range  (see  2.4.8.10). 

7.  Subroutine  DVAVE.  Calculate  averages  of  the  three  components  of  the  ion  drift  velocity  (see 
2.4.4.6.14). 

8.  Function  CVEFF.  Calculate  the  effective  scan  velocity  of  the  satellite  through  the  ionospheric 
irregularities  (see  2.4.4.6.15). 

9.  Function  CK.  Calculate  the  irregularity  strength  parameter,  Ck  (see  2.4.4.6.20). 

10.  Subroutine  CKDIAG.  CkL  processor  diagnostic  print  routine  (see  2.4.4.6.21). 

f.  Interfaces. 

1.  Called  by  Subroutine  PROCES. 

2.  Uses  COMMON  blocks  CKLANL,  CKLCON,  D FRAME,  EDRREC,  EPANL,  PIDEG,  SATEPH, 
SMANL,  and  SMCON. 
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2.4.4.6.1  Subroutine  CKLSAV. 


a.  Function. 

Save  the  density  and  SM  filter  data  to  be  used  in  calculating  Q.L. 

b.  Inputs. 

1.  Argument  list. 


DEN 

Ion  or  electron  density  (part/cm3) 

FIL 

SM  filter  data 

PROFIL  - 

SM  filter  process  flag  (LOGICAL) 

NSMFLT  - 

Number  of  SM  filters 

IDTIME  - 

Data  frame  time  (sec  since  midnight) 

NSECS 

Number  of  seconds  of  data  saved 

c.  Processing. 

1.  If  this  is  the  start  of  a  new  satellite  data  set  or  readout  REV  (flagged  by  NSECS=0),  then 

(a)  If  this  is  the  start  of  a  22-second  data-save  block  (any  block  with  a  time  (IDTIME)  ending  in 
4),  initialize  the  filter  buffer  control  words  and  continue  to  step  2. 

(b)  If  not,  return  to  Subroutine  CKLPRC. 

2.  If  this  is  the  start  of  a  new  save  block,  but  not  the  start  of  a  new  satellite  data  set  or  REV,  shift 
the  density  data  already  saved  by  10  seconds  (arrays  DEN  and  MSGDEN). 

3.  Load  the  new  density  data  (24  samples)  into  the  save  array  and  keep  track  of  how  many  missing 
data  flags  are  in  the  data.  The  missing-data  count  is  then  loaded  into  array  MSGDEN. 

4.  If  the  SM  filter  data  are  to  be  saved,  load  them  into  the  filter  save  buffer  (FILDTA).  If  one  10- 
second  section  of  the  buffer  is  full,  flip  the  buffer  section  counter  (MFIL). 

5.  Return  to  Subroutine  CKLPRC. 


d.  Outputs. 


1.  Argument  list. 

NSECS 

DENDTA 

MSGDEN 

FILDTA 

MFIL 


Updated  number-of-seconds  count 
Density  data  save  array  (22 -second  array) 
Density  data  missing-data  counter  array 
SM  filter  data  save  buffer 
Filter  buffer  pointer  (1  or  2) 


e.  Associated  subroutines. 


None. 
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f.  Interfaces. 


1.  Called  by  Subroutine  CKLPRC. 

2.  Uses  no  COMMON  blocks. 


2.4.4.6.2  Subroutine  CKLPRP. 


a.  Function. 


Prepare  the  high-resolution  ion  or  electron  density  data  stored  in  save-array  DENDTA  for 
calculation  of  QL.  This  is  done  in  two  steps:  (1)  replace  all  missing  data  points  (if  possible),  and 
(2)  detrend  the  data. 


b.  Inputs. 

1.  Argument  list. 

RESET 

DENDTA 

MSGDEN 

IDTRND 


New  satellite/REV  flag  (LOGICAL) 
Ion/electron  data  save  array  (part/cm3) 
Missing-data  counter  array 
Detrend  flag  (0:  detrend,  1:  no  detrend) 


c.  Processing. 

1.  Replace  missing  data  points  where  possible,  determine  if  the  data  set  has  too  much  missing  data 
for  the  QL  calculation,  and  reduce  the  data  set  to  a  256-word  subset  if  necessary  to  construct  a 
usable  data  set  (Subroutine  DENFIX). 

2.  If  the  data  set  is  usable,  detrend  the  data  and  calculate  the  RMS  AN  for  the  center  half  of  the  data 
set  (Subroutine  DETRND).  Note  that  the  starting  address  of  the  array  to  detrend  is  either 
DENDTA(9)  or  DENDTA(137)  depending  on  whether  the  data  set  to  use  is  512  or  256  words  in 
length.  This  is  done  to  select  the  center  512  to  256  points  from  the  DENDTA  array  for  inclusion 
in  the  detrended  data  set. 

3.  Return  to  Subroutine  CKLPRC. 


d.  Outputs. 


Argument  list. 

DN 

Detrended  density  data  (part/cm3) 

NDN 

Number  of  data  points  in  DN  (256  or  512) 

RMSDN  - 

RMS  AN  of  the  center  half  of  DN 

DNON 

(RMS  AN)/N  (%) 

GOOD 

Data  quality  flag: 

.TRUE.  -  Data  can  be  used  for  CkL 
.FALSE.  -  Data  cannot  be  used 
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e.  Associated  subroutines. 


1.  Subroutine  DENFIX.  Fill  in  missing  data  points  in  the  density-save  array  and  determine  if  too 
many  data  points  are  missing  (see  2.4.4.63). 

2.  Subroutine  DETRND.  Determine  and  remove  the  quadratic  trend  in  the  density  data,  and 
calculate  the  RMS  AN  for  the  center  half  of  the  detrended  data  set  (see  2.4.4.6.4). 

f.  Interfaces. 

1.  Called  by  Subroutine  CKLPRC. 

2.  Uses  no  COMMON  blocks. 


2.4.4.63  Subroutine  DENFIX. 

a.  Function. 

Replace  missing  data  points  in  the  density  save-array  (linear  interpolation)  and  determine  if  too 
many  data  points  are  missing.  If  a  one-second  block  with  too  many  missing  data  points  (more 
than  8)  is  found,  this  routine  will  limit  the  data  set  to  the  center  256  data  points  and  attempt  to 
build  a  usable  detrended  data  set  from  this  subset. 

b.  Inputs. 

1.  Argument  list. 

RESET  -  New  satellite/REV  flag  (LOGICAL) 

DENDTA  -  Density  data  save  array  (part/cm1) 

MSGDEN  -  Missing  data  count  array 

c.  Processing. 

1.  Check  each  one-second  (24  samples)  data  block  as  follows: 

(a)  If  more  than  6  data  points  are  missing  in  a  single  second,  then: 

(1)  If  this  second  of  data  is  located  in  the  first  or  last  five  seconds  of  the  data  set,  reset  the 
processing  pointers  to  process  only  the  center  11  seconds  of  the  data  set. 

(2)  If  it  is  not,  set  the  data  quality  flag  to  -1  and  jump  down  to  step  2. 

(b)  If  no  data  points  are  missing,  jump  down  to  step  2. 

(c)  Set  the  starting  array  index  for  this  second  of  data  (the  data  check  starts  at  word  9  in  the  first  , 

second  of  data  if  the  entire  data  set  is  to  be  checked,  at  word  137  located  in  the  sixth  second 

of  data  if  only  the  center  11  seconds  are  to  be  checked). 

(d)  Check  each  data  point  for  a  missing-data  flag.  If  one  or  two  data  points  are  missing,  fill  them 
in  using  a  linear  interpolation  from  the  two  points  on  either  side  of  the  one  or  two  point  data 
gap.  If  more  than  two  points  in  a  row  are  missing,  set  the  data  quality  flag  to  -1  and  jump  to 
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step  2. 


(e)  Check  for  the  end  of  a  one-second  block  (the  data  check  ends  at  word  520,  second  22,  if  the 
entire  data  set  is  checked,  or  at  word  392,  second  16,  if  only  the  center  11  seconds  are 
checked).  If  the  end  of  the  data  has  been  reached,  jump  down  to  step  2.  If  the  end  of  a 
second  has  been  reached,  set  the  missing-data  counter  entry  for  the  second  just  checked  to 
zero  and  jump  back  up  to  step  1(a). 

2.  Calculate  the  number  of  data  points  that  required  fixing  in  the  entire  data  array  (variable 
LSTNFX  is  the  number  of  missing  data  points  fixed  in  the  overlapping  section  of  density  data 
which  was  fixed  prior  to  the  last  CkL  calculation).  If  more  than  25  points  were  filled  in,  set  the 
data  quality  flag  to  -1. 

3.  Return  to  Subroutine  CKLPRP. 


d.  Outputs. 


1.  Argument  list. 

DENDTA 

MSGDEN 

NDN 

NQUAL 


"Patched"  as  possible 

Zeroed  where  corrections  made 

Number  of  data  points  to  use  (256  or  512) 

Data  quality  flag: 

>0:  Data  is  good  (number  of  corrected  data  points) 

-1:  Data  is  not  good  (too  many  missing  data  points) 


e.  Associated  subroutines. 


None. 


f.  Interfaces. 

1.  Called  by  Subroutine  CKLPRP. 

2.  Uses  no  COMMON  blocks. 


2.4.4.6.4  Subroutine  DETRND. 

a.  Function. 

Calculate  and  remove  the  quadratic  trend  from  a  data  set  spaced  at  1/24  second  intervals  and 
calculate  the  RMS  variation  in  the  center  half  of  the  detrended  data  set.  If  the  detrend  flag  is  set 
to  1,  undo  the  detrend  by  copying  the  raw  data  into  the  detrended  data  buffer.  Note:  The  detrend 
is  done  whether  or  not  detrended  data  is  used  in  the  FFT  in  order  to  calculate  the  RMS 
parameters. 

b.  Inputs. 

1.  Argument  list. 

DENDTA  -  Data  to  be  detrended 
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NPTS  -  Number  of  data  points  used  (256  or  512) 

IDTRND  -  Detrend  flag  (0:  detrend,  1:  no  detrend) 

c.  Processing. 

1.  Determine  whether  a  512  or  256  point  fit  is  required. 

2.  Calculate  the  coefficients  for  the  quadratic  trend  using  a  least  squares  fit. 

3.  Subtract  the  quadratic  trend  from  the  data  set. 

4.  Calculate  the  RMS  AN  and  (RMS  AN)/N  variation  in  the  center  half  of  the  detrended  data  set. 

5.  If  no  detrend  is  desired,  copy  the  original  data  into  the  detrended  data  array. 

6.  Return  to  Subroutine  CKLPRP. 


d.  Outputs. 

1.  Argument  list. 

DN  -  Detrended  data 

RMSDN  -  RMS  AN 

DNON  -  (RMS  AN)/N  (%) 

e.  Associated  subroutines. 

None. 

f.  Interfaces. 

1.  Called  by  Subroutine  CKLPRP. 

2.  Uses  no  COMMON  blocks. 


2.4.4.6.5  Subroutine  ENVMOD. 

a.  Function. 

Calculate  model  values  for  ionospheric  irregularity  parameters  a,  b,  6,  L,  and  p,.  The  algorithms 
and  model  constants  used  are  from  the  WBMOD  ionospheric  irregularity  model  with  the 
exception  of  the  model  for  L.  The  form  for  the  model  for  L  is  taken  from  the  model  form  used 
for  the  axial  ratio,  a. 

b.  Inputs. 

1.  Argument  list. 

APXLAT  - 
APXLT 
KP 


Apex  latitude  (dej 

Apex  local  time  (c  rial  hours) 

3  hour  K,,  index 
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BNDRY  -  High  latitude  scintillation  boundary  (deg): 

5  0.0  =  boundary  value  will  be  calculated 
>  0.0  =  boundary  value  to  be  used 

2.  COMMON  blocks. 


/SCNMOD/ 

AE 

Equatorial  model  value  for  a 

AA 

Auroral  model  value  for  a 

BH 

Auroral  model  value  for  b 

GMLA 

Equatorial  region  boundary  (deg) 

GMLAW  - 

Equatorial  region  transition  width  (deg) 

GML1 

Auroral  boundary  model  lead  term  (deg) 

CK 

Variation  of  auroral  boundary  with  K,, 

CBT 

Variation  of  auroral  boundary  with  time 

DBT 

Phase  of  auroral  boundary  time  variation  (hours) 

CHB 

Auroral  region  transition  width  parameter 

DELTA0  - 

Model  value  for  8 

LE 

Equatorial  model  value  for  L 

LM 

Mid-latitude  model  value  for  L 

LA 

Auroral  model  value  for  L 

Q 

Model  value  for  q 

c.  Processing. 

1.  Calculate  the  irregularity  axial  ratio  parameters,  a  and  b. 

2.  Calculate  the  location  of  the  auroral  scintillation  boundary  if  input  argument  BNDRY  is  <;  0.0. 

3.  Set  the  model  value  for  8. 

4.  Calculate  the  value  for  L. 

5.  Calculate  the  model  value  for  p^ 

6.  Return  to  Subroutine  CKLPRC. 

d.  Outputs. 

1.  Argument  list. 

A 
B 

DELTA 
LEFF 
P1M 

e.  Associated  subroutines. 

1.  Function  ERF.  Error  function  (see  2.4.8.4). 


Irregularity  axial  ratio  along  the  magnetic  field 
Irregularity  axial  ratio  across  the  magnetic  field 
Angle  between  magnetic  L-shells  and  irregularity  sheets  (rad) 
Effective  thickness  of  the  irregularity  layer  (km) 

Model  value  for  the  PDS  slope  parameter,  p,. 
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f.  Interfaces. 


1.  Called  by  Subroutine  CKLPRC. 

2.  Uses  COMMON  block  SCNMOD. 


2.4.46.6  Subroutine  BLDPDS. 

a.  Function. 

Construct  a  power  density  spectrum  (PDS)  from  the  detrended  high-resolution  density  data  and 
the  SM  sensor  filter  data. 

b.  Inputs. 


Argument  list. 

DN 

Detrended  density  data  (part/cm3) 

NDN 

Number  of  points  in  DN  (256  or  512) 

FILDTA  - 

SM  sensor  filter  data 

PROFIL  - 

SM  filter  use  flag  (LOGICAL) 

NSMFLT  - 

Number  of  SM  filters 

SMFFRQ  - 

Center  frequencies  of  the  SM  filters  (Hz) 

FILFAC  - 

Filter  PDS  adjustment  factor 

IWNDOW  - 

FFT  window  parameter  (0-10) 

ISMOO 

Smoother  flag 

=0:  Do  not  smooth  the  PDS 
*0:  Smooth  the  PDS 


c.  Processing. 

1.  Construct  the  low-frequency  portion  of  the  spectrum  from  the  detrended  high-resolution  density 
data  (Subroutine  DENPDS). 

2.  If  the  SM  filter  data  are  available,  add  the  filter  PDS  data  to  the  high-frequency  end  of  the  PDS 
(Subroutine  FILPDS). 

3.  Return  to  Subroutine  CKLPRC. 


d.  Outputs. 


1.  Argument  list. 

FREQ 

PDS 

NPDS 

DFREQ 

DPDS 


PDS  frequencies  (Hz) 

Power  density  spectrum  ((ion/cm3)2/Hz) 
Number  of  data  points  in  full  PDS 
Decimated  PDS  frequencies  (Hz) 
Decimated  PDS  ((ion/cm3)2/Hz) 
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e. 


Associated  subroutines. 


1.  Subroutine  DENPDS.  Calculate  the  low-frequency  end  of  the  PDS  from  the  detrended  high- 
resolution  density  data  (see  2.4.46.7). 

2.  Subroutine  FILPDS.  Construct  the  high-frequency  end  of  the  PDS  from  the  SM  filter  data  (see 
2.4.4.6.11). 

f.  Interfaces. 

1.  Called  by  Subroutine  CKLPRC. 

2.  Uses  no  COMMON  blocks. 


2.4.4.6.7  Subroutine  DENPDS. 


a.  Function. 


Calculate  the  power  density  spectrum  (PDS)  of  the  input  512  point  data  set  and  a  decimated  PDS 
at  equally  spaced  (log)  frequency  steps. 

b.  Inputs. 


1.  Argument  list. 


DN 

NPTS 

IWNDOW 

ISMOO 


Data  set  from  which  to  calculate  the  PDS 
Number  of  data  points  used  (256  or  512) 
FFT  window  parameter  (0-10) 

Smoother  flag 

=0:  Do  not  smooth  the  PDS 
*0:  Smooth  the  PDS 


c.  Processing. 

1.  If  the  number  of  points  has  not  changed,  calculate  the  window  to  be  used  on  the  data  (Subroutine 
WINDOW)  and  the  necessary  normalization  factors. 

2.  Apply  the  window  to  the  input  data. 

3.  Perform  a  fast-Fourier  transform  on  the  windowed  data  (Subroutine  FFT). 

4.  Convert  the  spectrum  calculated  by  the  FFT  to  a  power  density  spectrum  and  calculate  the 
frequencies  of  the  spectrum. 

5.  If  user-requested,  smooth  the  PDS. 

6.  Decimate  the  full  PDS  to  a  6  point  PDS  with  equally  spaced  (log)  frequencies.  This  is  done  by  a 
simple  linear  interpolation. 

7.  Return  to  Subroutine  BLDPDS. 
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d.  Outputs. 


1.  Argument  list. 

FREQ  -  PDS  frequencies  (Hz) 

PDS  -  Power  density  spectrum  ((el/cm3)2/Hz) 

DFREQ  -  Frequencies  in  the  decimated  PDS  (Hz) 

DPDS  -  6-point  PDS  ((el/cm3)2/Hz) 

e.  Associated  subroutines. 

1.  Subroutine  WINDOW.  Construct  the  window  to  be  applied  to  the  input  data  prior  to  the  FFT 
(see  2.4.46.8). 

2.  Subroutine  FFT.  Calculate  the  fast-Fourier  transform  of  an  input  512-point  data  set  (see 
2.4.46.9). 

3.  Subroutine  BSMOO.  Smooth  the  PDS  (see  2.4.4.6.10). 

f.  Interfaces. 

1.  Called  by  Subroutine  BLDPDS. 

2.  Uses  no  COMMON  blocks. 

2.4.4.6.8  Subroutine  WINDOW. 

a.  Function. 

Construct  a  simple  half-lobe  cosine  window  to  be  applied  to  a  data  set  prior  to  an  FFT. 

b.  Inputs. 

1.  Argument  list. 

NPTS  -  Number  of  data  points  in  the  window 
IWNDOW  -  FFT  window  parameter  (0-10): 

0:  do  not  window  data 

>0:  Use  lOx(IWNDOW)  %  cosine  taper  window 

2.  COMMON  blocks. 

/PIDEG/ 

PI  -  n 

c.  Processing. 

1.  Fill  the  window  with  ones. 

2.  If  IWNDOW  is  non-zero,  then 
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(a)  Calculate  the  percent  of  taper  in  the  window. 

(b)  Construct  the  window. 

Calculate  the  window  normalization  factor. 


3. 

4.  Return  to  Subroutine  DENPDS. 

d.  Outputs. 

1.  Argument  list. 

W  -  Window 

WNORM  -  Window  normalization  factor 

e.  Associated  subroutines. 

None. 

f.  Interfaces. 

1.  Called  by  Subroutine  DENPDS. 

2.  Uses  COMMON  block  PIDEG. 


2.4.4.6.9  Subroutine  FFT. 

a.  Function. 

Perform  a  fast-Fourier  transform  (FFT)  on  an  input  data  set.  (Note:  This  routine,  and  its 
associated  subroutines,  make  up  a  standard  FFT  package  developed  and  supported  by  the  IEEE 
(See  reference  1.2.3w).  A  copy  of  the  description  of  this  package  from  reference  1.2.3w  can  be 
found  in  the  SSIES  Project  Workbook.) 

b.  Inputs. 

1.  Argument  list. 

B  -  Data  set  to  transform 

N  -  Number  of  data  points  in  B  (must  be  an  even  power  of  2) 

c.  Processing. 

1.  Calculate  the  power  of  2  and  4  for  the  input  number  of  data  points. 

2.  If  the  number  of  data  points  is  not  an  even  power  of  4,  perform  the  radix-2  iterations  (Subroutine 
FR2TR). 

3.  Perform  the  radix-4  iterations  (Subroutine  FR4TR). 

4.  Perform  the  radix-2  (Subroutine  FORD1)  and  radix-4  (Subroutine  FORD2)  reordering  of  the 
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FFT. 


5.  Return  to  Subroutine  DENPDS. 

d.  Outputs. 

1.  Argument  list. 

B  -  FFT  of  the  input  data 

e.  Associated  subroutines. 

1.  Subroutine  FORD1.  Perform  radix-2  reordering. 

2.  Subroutine  FORD2.  Perform  radix-4  reordering. 

3.  Subroutine  FR2TR.  Perform  radix-2  iterations  of  FFT. 

4.  Subroutine  FR4TR.  Perform  radix-4  iterations  of  FFT. 

f.  Interfaces. 

1.  Called  by  Subroutine  DENPDS. 

2.  Uses  no  COMMON  blocks. 

2.4.4.6.10  Subroutine  BSMOO. 

a.  Function. 

Smooth  an  input  data  set  using  a  centered,  moving  smoother  with  binomial  weights.  The 
smoother  can  be  3,  5,  7,  9,  or  11  points  in  width.  The  size  of  the  smoother  is  adjusted 
progressively  downward  from  the  user  specified  width  to  a  width  of  1  at  the  ends  of  the  data  set  to 
avoid  problems  with  partial  smoothing  at  the  ends. 

b.  Inputs. 

1.  Argument  list. 

DATA  -  Data  to  be  smoothed 

NPTS  -  Number  of  points  in  DATA 

NSMOO  -  Size  of  smoother  (1-5) 

c.  Processing. 

1.  If  the  size  of  the  smoother  is  outside  the  allowed  range,  alert  the  user  and  set  the  smoother  to  the 
maximum  size  (5). 

2.  Save  the  first  and  last  points  (which  are  not  smoothed  in  this  algorithm)  in  the  smoothed  data 
array  (SDATA). 


136 


3.  Step  through  the  remaining  points,  smoothing  as  follows: 

(a)  Determine  the  size  of  the  smoother  based  on  the  user-requested  size  and  the  distance  (in  data 
points)  to  the  ends  of  the  data  set. 

(b)  Calculate  the  smoothed  value  for  the  current  data  point  by  generating  a  binomial  weighted 
sum  of  the  data  points  surrounding  the  current  point. 

(c)  Store  the  smoothed  data  point  in  the  smoothed  data  array  (SDATA). 

4.  Return  to  Subroutine  DENPDS. 

d.  Outputs. 

1.  Argument  list. 

SDATA  -  Smoothed  data 

e.  Associated  subroutines. 

None. 

f.  Interfaces. 

1.  Called  by  Subroutine  DENPDS. 

2.  Uses  no  COMMON  blocks. 


2.4.4.6.11  Subroutine  FILPDS. 


a.  Function. 


Construct  the  high-frequency  end  of  the  PDS  from  SM  sensor  filter  data, 
b.  Inputs. 


1.  Argument  list. 

FILDTA 

NSMFLT 

SMFFRQ 

FILFAC 

c.  Processing. 


SM  filter  data  save  buffer 
Number  of  SM  filters 
Center  frequencies  of  the  SM  filters  (Hz) 
Filter  PDS  adjustment  factor 


1.  For  each  filter,  sum  the  values  in  the  ten  one-second  samples  in  FILDTA  to  construct  the  average 
PDS  and  add  the  filter  samples  into  the  PDS  array  with  the  filter  frequency. 

2.  Return  to  Subroutine  BLDPDS. 
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d.  Outputs. 


1.  Argument  list. 


FREQ 

PDS 

NPDS 

DFREQ 

DPDS 


PDS  frequencies 

Power  density  spectrum  from  the  filter  data 
Number  of  values  in  FREQ  and  PDS 
Frequencies  of  filter  section  of  decimated  PDS  (Hz) 
Filter  section  of  the  decimated  PDS 


e.  Associated  subroutines. 


None. 


f.  Interfaces. 

1.  Called  by  Subroutine  BLDPDS. 

2.  Uses  no  COMMON  blocks. 


2.4.4.6.12  Subroutine  TANDP. 


a.  Function. 

Calculate  irregularity  parameters  T,  and  p1  from  the  power  density  spectrum  (PDS). 


b.  Inputs. 

1.  Argument  list. 

FREQ 

PDS 

NFPDS 

FL 

FU 

FFTNF 

NPTS 


PDS  frequencies  (Hz) 

Power  density  spectrum  ((el/cm3)2/Hz) 

Number  of  PDS  entries  from  the  FFT  calculation 
Lower  frequency  cutoff  for  log-linear  fit  (Hz) 
Higher  frequency  cutoff  for  log-linear  fit  (Hz) 
Noise  floor  cutoff  for  FFT  section  of  PDS 
Number  of  points  in  arrays  FREQ  and  PDS 


c.  Processing. 

1.  On  first  call,  validity  check  the  user  input  parameters. 

2.  Determine  the  limits  of  the  fit  for  either  the  full  or  decimated  PDS  so  that  the  frequencies  in  FU 
and  FL  bound  the  log  linear  fit  frequencies. 

3.  Convert  both  frequency  and  PDS  to  log. 

4.  If  enough  data  points  are  available  (50  for  the  full  PDS,  3  for  a  decimated  PDS),  perform  the  log 
linear  least  squares  fit  (Subroutine  LSF). 

5.  If  the  fit  was  good,  set  PI  and  Tl.  Otherwise,  set  them  to  the  missing  data  flag. 
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6.  Return  to  Subroutine  CKLPRC. 


d.  Outputs. 

1.  Argument  list. 

T1  -  Value  of  the  log-linear  fit  at  1  Hz  frequency  (dB  MKS) 

PI  -  Slope  of  the  log-linear  fit 

e.  Associated  subroutines. 

1.  Subroutine  LSF.  Perform  a  linear  least  squares  fit  to  a  data  set  (see  2.4.4.6.13). 

f.  Interfaces. 

1.  Called  by  Subroutine  CKLPRC. 

2.  Uses  no  COMMON  blocks. 

2.4.4.6.13  Subroutine  LSF. 

a.  Function. 

Calculate  the  coefficients  of  a  linear  least  squares  fit  to  the  input  data  set. 

b.  Inputs. 

1.  Argument  list. 

X  -  Array  of  x  data  points 

Y  -  Array  of  y  data  points 

NPTS  -  Number  of  points  in  X  and  Y 

c.  Processing. 

1.  Build  the  matrix  for  the  linear  least  squares  fit. 

2.  If  the  determinant  of  the  fit  matrix  is  non-zero,  calculate  the  coefficients  for  the  linear  fit. 
Otherwise,  set  the  fit  quality  flag  to  indicate  that  a  fit  was  not  found. 

3.  Return  to  Subroutine  TANDP. 

d.  Outputs. 

1.  Argument  list. 

AO  -  Intercept  of  linear  fit  equation 

A1  -  Slope  of  linear  fit  equation 

GOOD  -  Good  analysis  flag 
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e.  Associated  subroutines. 


None, 
f.  Interfaces. 

1.  Called  by  Subroutine  TANDP. 

2.  Uses  no  COMMON  blocks. 

2.4.4.6.14  Subroutine  DVAVE. 

a.  Function. 

Calculate  average  values  for  the  three  components  of  the  in  situ  ion  drift  velocity. 

b.  Inputs. 

1.  Argument  list. 

ITCKL  -  Analysis  time  (seconds  since  midnight) 

NPTEDR  -  EDR  load  buffer  pointer 

EDR  -  EDR  load  buffer  (REAL) 

IEDR  -  EDR  load  buffer  (INTEGER) 

c.  Processing. 

1.  Determine  which  of  the  two  EDRs  stored  in  the  EDR  load  buffer  to  use  based,  on  the  time  of  the 
current  CkL  analysis  and  the  times  in  the  EDRs. 

2.  Loop  through  the  chosen  EDR  buffer  to  calculate  the  average  cross-track  drift  velocities  (from 
DM  sensor  analyses)  for  a  ten  second  period  centered  on  the  CkL  analysis  time. 

3.  Select  the  ram  drift  velocity  from  the  RPA  analysis  nearest  in  time  to  the  CkL  analysis  time. 

4.  Return  to  Subroutine  CKLPRC. 

d.  Outputs. 

1.  Argument  list. 

UR  -  Ram  drift  velocity  (m/s) 

UH  -  Horizontal  cross-track  drift  velocity  (m/s) 

UV  -  Vertical  cross-track  drift  velocity  (m/s) 

e.  Associated  subroutines. 

None. 
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f.  Interfaces. 


1.  Called  by  Subroutine  CKLPRC. 

2.  Uses  no  COMMON  blocks. 


2.4.4.6.15  Function  CVEFF. 

a.  Function. 

Calculate  the  effective  scan  velocity  of  the  satellite  through  the  irregularity  field  in  the  irregularity 
coordinate  system. 

b.  Inputs. 

1.  Argument  list. 


vsc 

Spacecraft  orbital  velocity  (m/s) 

UR 

Ram  ion  drift  velocity  (m/s) 

UH 

Horizontal  cross-track  ion  drift  velocity  (m/s) 

UV 

Vertical  cross-track  ion  drift  velocity  (m/s) 

ORBINC  - 

Orbital  inclination  (rad) 

PHI 

Angle  in  orbit  from  ascending  node  (rad) 

GLAT 

Geographic  latitude  (deg) 

GLON 

Geographic  longitude  (deg) 

ALT 

Altitude  (km) 

IYMD 

Packed  year,  month,  day  of  REV  (YYMMDD) 

DELTA  - 

Angle  between  magnetic  L-shells  and  irregularity  sheets  (rad) 

A,B 

Irregularity  axial  ratios 

2.  COMMON  blocks. 

/PIDEG/ 

RAD  -  Degree  to  radian  conversion  factor 

c.  Processing. 

1.  Calculate  the  velocity  of  the  spacecraft  with  respect  to  the  irregularities  in  a  geographic 
latitude/longitude-oriented  coordinate  system  (Subroutine  CTRANS). 

2.  Calculate  the  rotation  matrix  required  to  transform  the  velocity  into  the  irregularity  coordinate 
system  (Subroutine  CMAT). 

3.  Calculate  the  effective  velocity  of  the  spacecraft  in  the  irregularity  coordinate  system  using  the 
rotation  matrix. 

4.  Return  to  Subroutine  CKLPRC. 
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d.  Outputs. 


1.  Function  value. 

CVEFF  -  Effective  scan  velocity  (m/s) 

e.  Associated  subroutines. 

1.  Subroutine  CTRANS.  Transform  from  the  spacecraft  coordinate  system  to  a  geographic-oriented 
coordinate  system  (see  2.4.4.6.16). 

2.  Subroutine  MAGFLD.  Calculate  the  vector  components  of  the  earth’s  magnetic  field  at  a  given 
latitude/longitude/altitude  (see  2.4.4.6.17). 

3.  Subroutine  CMAT.  Calculate  the  rotation  matrix  to  transform  from  a  geographic-oriented 
coordinate  system  to  the  irregularity  coordinate  system  (see  2.4.4.6.19). 

f.  Interfaces. 

1.  Called  by  Subroutine  CKLPRC. 

2.  Uses  COMMON  block  PIDEG. 


2.4.4.6.16  Subroutine  CTRANS. 
a.  Function. 

Transform  between  a  coordinate  system  oriented  with  the  spacecraft  motion  (+x  nadir,  +y  along 
orbit,  +z  towards  sun,  for  an  ascending  daytime  orbit)  to  a  system  oriented  with  the  geographic 
latitude  and  longitude  (+x  north,  +y  east,  +z  nadir).  A  description  of  this  transformation  can  be 
found  in  Section  4. 1.3.2. 


b.  Inputs. 

1.  Argument  list. 

VFROM 

ORBINC 

PHI 

GLAT 

TOGEOG 


Vector  to  transform 
Orbital  inclination  (rad) 

Angle  in  orbit  from  ascending  node  (rad) 
Geographic  latitude  (rad) 

Transformation  direction  switch  (LOGICAL): 
.TRUE.  -  To  geographic  system 
.FALSE.  -  To  spacecraft  system 


c.  Processing. 

1.  Calculate  the  angle  between  the  spacecraft  direction  and  the  local  geographic  coordinate  system. 

2.  Rotate  the  input  vector  according  to  the  angle  just  calculated  and  the  transformation  switch. 

3.  Return  to  Function  CVEFF. 
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d.  Outputs. 

1.  Argument  list. 

VTO  -  Transformed  vector 

e.  Associated  subroutines. 

None. 

f.  Interfaces. 

1.  Called  by  Function  CVEFF. 

2.  Uses  COMMON  block  PIDEG. 


2.4.4.6.17  Subroutine  MAGFLD. 


a.  Function. 


Calculate  the  local  magnetic  field  vectors  from  a  real  field  model  of  the  earth’s  magnetic  field. 
The  theory  behind  this  routine  can  be  found  in  reference  1.2.3t. 


b.  Inputs. 


1.  Argument  list. 


GLAT 

GLON 

ALT 

IYMD 


Geographic  latitude  (deg) 

Geographic  longitude  (deg) 

Altitude  (km) 

Packed  year,  month,  day  of  REV  (YYMMDD) 


2.  COMMON  blocks. 


/PIDEG/ 

DEG  -  Degrees  to  radians  conversion  factor 


c.  Processing. 

1.  On  the  first  call,  invoke  Subroutine  IGRF  to  initialize  the  expansion  coefficients  of  the  magnetic 
field  model. 

2.  Convert  the  input  latitude  and  longitude  to  inverse  Cartesian  coordinates,  and  then  to  Cartesian 
coordinates,  correcting  for  the  earth’s  oblateness. 

3.  Calculate  the  translated  expansion  coefficients. 

4.  Use  the  expansion  coefficients  to  calculate  the  geomagnetic  field  components. 

4.  Return  to  Subroutine  CVEFF. 
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d.  Outputs. 


1.  Argument  list. 

BABS 

BNORTH 

BEAST 

BNADIR 


Total  magnetic  field  strength  (gauss) 

X  component  of  earth’s  magnetic  field 
Y  component  of  earth’s  magnetic  field 
Z  component  of  earth’s  magnetic  field 


e.  Associated  subroutines. 


1.  Subroutine  IGRF.  Calculate  the  coefficients  for  a  spherical  harmonic  expansion  of  the  earth’s 
magnetic  field  (see  2.4.4.6.18). 


f.  Interfaces. 


1.  Called  by  Subroutine  CVEFF. 

2.  Uses  COMMON  block  PIDEG. 


2.4.4.6.18  Subroutine  IGRF. 

a.  Function. 

Initialize  the  expansion  coefficients  of  the  International  Geomagnetic  Reference  Field.  This  has 
been  updated  to  use  the  1990  model  of  the  earth’s  magnetic  field.  See  reference  1.2.3t. 

b.  Inputs. 

1.  Argument  list. 

YEAR  -  year  (e.g.  1993.0) 

c.  Processing. 

1.  Calculate  the  time  variable  for  correcting  the  coefficients  to  the  current  year. 

2.  Sum  over  the  components  to  convert  them  to  the  format  required  for  Subroutine  MAGFLD. 

3.  Return  to  Subroutine  MAGFLD. 

d.  Outputs. 

1.  Argument  list. 

G  -  Modified  field  expansion  coefficients 

e.  Associated  subroutines. 

None. 
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f.  Interfaces. 


1.  Called  from  Subroutine  MAGFLD. 

2.  Uses  no  COMMON  blocks. 


2.4.4.6.19  Subroutine  CMAT. 


a.  Function. 


Calculate  the  rotation  matrix  used  to  transform  from  a  geographic  coordinate  system  to  the 
irregularity  coordinate  system.  See  page  864  of  reference  1.2.3t  for  a  description  of  this  matrix. 


b.  Inputs. 

1.  Argument  list. 
DIP 

DELTA 

A,B 


Magnetic  dip  angle  (rad) 

Angle  between  magnetic  L-shells  and  irregularity  sheets  (rad) 
Irregularity  axial  ratios 


c.  Processing. 

1.  Calculate  parameters  used  in  constructing  the  matrix. 

2.  Calculate  the  on-diagonal  terms. 

3.  If  axial  ratio  B  is  not  1.0  (irregularity  sheets),  calculate  the  off-diagonal  terms.  If  it  is  1.0,  set  the 
off-diagonal  terms  to  zero. 

4.  Return  to  Function  CVEFF. 


d.  Outputs. 

1.  Argument  list. 

C  -  Transformation  matrix 


e.  Associated  subroutines. 


None. 


f.  Interfaces. 


1.  Called  by  Function  CVEFF. 

2.  Uses  no  COMMON  blocks. 
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2.4.4.6.20  Function  CK. 


a.  Function. 


Calculate  the  irregularity  strength  parameter  Ck. 


b.  Inputs. 

1.  Argument  list. 

T1 

PI 

VEFF 


Irregularity  parameter  T, 
Irregularity  parameter  p, 
Effective  satellite  velocity  (m/s) 


c.  Processing. 

1.  Calculate  Ck. 

2.  Return  to  Subroutine  CKLPRC. 

d.  Outputs. 

1.  Function  value. 

CK  -  Irregularity  strength  parameter  Ck 

e.  Associated  subroutines. 

None. 

f.  Interfaces. 

1.  Called  by  Subroutine  CKLPRC. 

2.  Uses  no  COMMON  blocks. 


2.4.4.6.21  Subroutine  CKDIAG. 


a.  Function. 


Construct  diagnostic  output  files  for  the  CkL  analysis  module. 


b.  Inputs. 

1.  Argument  list. 

ITCKL 

DENDTA 

FILDTA 

DN 

NDN 


Analysis  time  (seconds  since  midnight) 
Density  data  used  to  calculate  CkL 
SM  filter  data  used  to  calculate  CkL 
Detrended  density  data  used  to  calculate  CkL 
Number  of  data  points  in  DN 


146 


FREQ 

- 

PDS  frequencies  (Hz) 

PDS 

- 

Power  density  spectrum  used  to  calculate  CtL 

NPDS 

- 

Number  of  data  points  in  FREQ  and  PDS 

GLAT 

- 

Geographic  latitude  (deg) 

GLON 

- 

Geographic  longitude  (deg) 

APXLAT 

- 

Apex  latitude  (deg) 

APXLON 

- 

Apex  longitude  (deg) 

APXLT 

- 

Apex  local  time  (hours) 

A,B 

- 

Irregularity  axial  ratios 

DELTA 

- 

Angle  between  L-shells  and  irregularity  sheets  (rad) 

LEFF 

- 

Effective  thickness  of  irregularity  layer  (km) 

P1M 

- 

Model  value  of  pj 

VEFF 

- 

Effective  satellite  scan  velocity 

RMSDN 

- 

RMS  AN 

IDIAG 

- 

Diagnostic  print  switch 

COMMON  blocks. 

0:  No  diagnostic  output 

1:  Binary  output  file  only 

2:  ASCII  output  file  only 

3:  Both  binary  and  ASCII  output  files 

/CKLANL/ 

CNON 

- 

(RMS  AN)/N  (%) 

CKL 

- 

Height-integrated  irregularity  strength  (CkL) 

T1 

- 

Value  of  log-linear  PDS  fit  at  f=lHz 

PI 

- 

Slope  of  log-linear  PDS  fit 

DFRQ 

- 

Frequencies  in  decimated  PDS  (Hz) 

DPDS 

- 

Decimated  power  density  spectrum 

ICKLEF 

- 

CkL  processing  error  flag 

ICKLAR 

" 

CkL  analysis  results  flag 

/CKLCON/ 

RMSLIM 

- 

(RMS  AN)/N  cutoff  for  CkL  calculation  (%) 

FL 

- 

Lowest  frequency  for  linear  PDS  fit  (Hz) 

FU 

- 

Highest  frequency  for  linear  PDS  fit  (Hz) 

MODP1 

- 

Model  p,  use  flag: 

FILFAC 

0:  Use  only  if  calculated  P[  is  bad 

1:  Use  at  all  times 

Filter  output  adjustment  factor 

FFTNF 

- 

Noise  floor  for  FFT  section  of  PDS 

IWNDOW 

- 

FFT  window  taper  flag  (0-10) 

IDTRND 

- 

Detrend  flag: 

LSFPDS 

0:  detrend 

1:  do  not  detrend 

PDS  to  use  in  log-linear  fit: 

LOCK 

0:  full  PDS 

1:  decimated  PDS 

Scale  size  for  CkL  calculation  (m) 
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ICKLU 

CKLKP 

/LUDIAG/ 

LUCKLA  - 
LUCKLB  - 

/PROCON/ 

IFLT 


Ion  drift  velocity  use  flag 

0:  use  no  ion  drift  velocity  in  VTOT 
1:  use  no  ram  drift  velocity  in  VTOT 
2:  use  all  ion  drift  velocity 
Nominal  K,,  value  to  use  in  models 


Logical  unit  number  of  ASCII  output  file 
Logical  unit  number  for  binary  output  file 


Satellite  flight  ID 


c.  Processing. 

1.  On  first  call  to  this  routine,  open  the  necessary  ASCII  and/or  binary  output  files  (Subroutine 
OPNDOF). 

2.  If  neither  file  could  be  opened,  set  the  diagnostic  print  flag  to  zero  (disabling  the  diagnostic 
output)  and  return  to  Subroutine  CKLPRC. 

3.  If  an  ASCII  output  file  is  requested,  then 

(a)  If  a  RESET=.TRUE.  call,  output  the  sensor  processing  constants  and  processing  control 
information  for  the  CKL  module. 

(b)  If  the  data  frame  was  good,  write  out  all  data  input  and  produced  in  the  current  invocation  of 
the  CKL  processor. 

4.  If  a  binary  output  file  is  requested,  then,  if  the  frame  was  good,  write  the  diagnostic  output  buffer 
to  the  output  file. 

5.  Return  to  Subroutine  CKLPRC. 

d.  Outputs. 

IESCKLPRT.  ASCII  diagnostic  output  file  (see  Section  4.4.5). 

IESCKLDIAG.  Binary  diagnostic  output  file  (see  Section  4.4.5). 

e.  Associated  subroutines. 

1.  Subroutine  OPNDOF.  Open  diagnostic  output  files  (see  2.4.8.9). 

2.  Subroutine  FILERR.  File  error  handling  routine  (see  2.4.S.5). 

f.  Interfaces. 

1.  Called  from  Subroutine  CKLPRC. 
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2.  Uses  COMMON  blocks  CKLANL,  CKLCON,  LUD1AG,  and  PROCON. 


2.4.4.7  Subroutine  QCPRC. 
a.  Function. 

Collect  parameters  stored  in  file  IESSTATFILE  to  include  REV  averages  of  various  parameters 
generated  from  the  analysis  of  data  from  the  SSIES  sensors,  REV  averages  of  the  difference  in 
plasma  density  calculated  by  the  various  sensors,  analysis  success  counters,  and  the  data  frame  skip 
counter.  These  are  all  loaded  into  a  buffer  which  is  output  to  file  IESSTATFILE  when  the  end  of 


data  is  reached  for  a  satellite  or  readout  REV.  Figure  16  is  a  hierarchy  chart  for  this  module. 


QCPRC: 

perform  and  report  comparisons  of  processor  results 

.  SCDIAG: 

report  spacecraft  and  processing  diagnostics 

.  .  BITON: 

test  for  bit  setting 

.  IAVRGE: 

compute  an  integer  average  for  specified  sum 

.  AVRAGE: 

compute  a  floating  point  average  for  specified  sum 

.  LDSTF: 

prepare  IESSTATFILE  for  new  status  report 

.  .  TIMCON: 

convert  between  UT  and  IES  reference  minutes 

.  .  PRNTON: 

set  PRINTAWAY  status  for  conclusion  of  processing 

.  .  COPY: 

initialize  array  or  transfer  values  between  arrays 

.  .  SFSUM: 

report  summary  records 

.  .  FILERR: 

determine  and  report  file  error  status 

.  COPY: 

initialize  array  or  transfer  values  between  arrays 

.  QCRPA: 

obtain  ion  data  from  RPAPRC  or  MPPRC  results 

.  QCEP: 

obtain  electron  data  from  EPPRC  or  MPPRC  results 

Figure  16  QCPRC  module  hierarchy  chart 


b.  Inputs. 

1.  Argument  list. 

THEEND  -  End-of-data  flag 

2.  COMMON  blocks. 

/CKLANL/ 

CKL  -  Integrated  irregularity  spectral  strength 

NCKLG  -  Number  of  good  CkL  analyses  in  current  REV 

NCKLT  -  Number  of  total  analyses  attempted 
ICKLEF  -  CkL  analysis  error  flag 

ICKLAR  -  CkL  analysis  results  flag 

/DFRAME/ 

IDTIME  -  Time  of  current  data  frame  (seconds  since  midnight) 
IQFRME  -  Data  frame  quality  flag 

MODEP  -  EP  sensor  mode  (0-6:  A-E) 
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/DMANL/ 


DMAUH  - 
DMAUV  - 
DMIDEN  - 
IDMEF 
IDMAR  - 

/EPANL/ 

IEPTIM 
EPEDEN  - 
EPADEN  - 

EPETMP  - 

EPVPOT  - 

NEPSG 

NEPST 

IEPEF 

IEPAR 

/MPEANL/ 


Average  horizontal  ion  drift  velocity  (m/s) 
Average  vertical  ion  drift  velocity  (m/s) 
Ion  density  (ion/cm3) 

DM  analysis  error  flag 
DM  analysis  results  flag 


Sweep  center  time  (seconds  since  midnight) 
DC  mode  electron  density  (24,  el/cm3) 

(DC  mode)  Average  electron  density  (el/cm3) 
(sweep  mode)  Electron  density  (el/cm3) 
Electron  temperature  (°K) 

EP  sensor  potential  (volts) 

Number  of  successful  sweep  analyses 
Number  of  sweep  analyses  attempted 
EP  analysis  error  flag 
EP  analysis  results  flag 


METIME  - 
EDENMP  - 
ETMP 

SPEPMP  - 
IMPEAR  - 

/MPIANL/ 

MITIME  - 
ODENMP  - 
OTMP 
HDENMP  - 
HTMP 
URMP 
SPRPMP  - 
IMPIAR  - 

/PROCON/ 


EP  sweep  center  time  (seconds  since  midnight) 
MP  EP  electron  density  (el/cm3) 

MP  EP  electron  temperature  (°K) 

MP  EP  satellite  potential  (volts) 

MP  EP  sweep  analysis  results  flag 


RPA  sweep  center  time  (seconds  since  midnight) 
MP  RPA  O+  density  (ion/cm3) 

MP  RPA  0+  temperature  (°K) 

MP  RPA  light  ion  density  (ion/cm3) 

MP  RPA  light  ion  temperature  (°K) 

MP  RPA  ram  ion  drift  velocity  (m/s) 

MP  RPA  satellite  potential  (volts) 

MP  RPA  analysis  results  flag 


IFLT 
MISSID 
NUMREV  - 
IDOQC 
IDBEP 
IDBRP 
ISWCKL  - 
IRMIN 
NEWSAT  - 
NEWREV  - 


Satellite  flight  ID 

Satellite  mission  ID 

Readout  REV  number 

QCPRC  module  processing  control  flag 

EP  analysis  source  for  database 

RPA  analysis  source  for  database 

Data  source  for  CkL  analysis 

Time  of  current  run  (IES  minutes) 

New  satellite  flag 
New  readout  REV  flag 
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/RPAANL/ 

RPHDEN  - 
RPODEN  - 
RPEDEN  - 
RPITMP  - 
RPAUR  - 
RPVPOT  - 
NRPASG  - 
NRPAST  - 
IRPEF 

IRPAR 

Light  ion  density  (ion/cm3) 

O-f  ion  density  (ion/cm3) 

Total  ion  density  (ion/cm3) 

Ion  temperature  (°K) 

Ram  ion  drift  velocity  (m/s) 

Satellite  potential  (volts) 

Number  of  successful  RPA  sweep  analyses 
Number  of  RPA  sweeps  analyses  attempted 

RPA  analysis  error  flag 

RPA  analysis  results  flag 

/SATEPH/ 

IYMD 

Dates  for  EDRs  (6)  (YYMMDD) 

/SMANL/ 

SMADEN  - 
SMFPDS  - 
ISMEF 

ISMAR 

Average  ion  density  (ion/cm3) 

Irregularity  PDS  estimates  (9)  ((ion/cm3)2/Hz) 

SM  analysis  error  flag 

SM  analysis  results  flag 

/SCSOH/ 

AELTMP  - 
ADSMTP  - 
AADCTP  - 
ADMVO  - 

Running  average  SSIES  electronics  temperature 
Running  average  DM/SM  electronics  temperature 
Running  average  ADC  temperature 

Running  average  DM  sensor  offset  voltage 

c.  Processing. 

1.  If  requested,  output  spacecraft/processing  status  information  (Subroutine  SCDIAG). 

2.  If  a  new  satellite,  new  REV,  or  end  of  data  is  encountered,  then: 

(a)  If  this  is  not  the  first  call  to  this  routine,  calculate  the  REV  averages  of  the  data  in  the  save 
buffer,  load  various  data  into  the  buffer  for  1ESSTATFILE,  and  write  the  buffer  out  to  the  file 
(Subroutine  LDSTF). 

(b)  Initialize  all  save  variables  and  arrays. 

3.  Collect  the  following  data  from  the  current  one-second  data  analyses  when  available: 

(a)  CkL  analyses 

(b)  Increment  missing  frame  counter  as  necessary 

(c)  REV  date/time/number  (on  first  time  through) 

(d)  SM  averages  (density  and  first  filter)  and  running  mean  of  density 

(e)  DM  averages  (density  and  velocities)  and  running  mean  of  density 

(f)  RPA  averages  (densities,  temperature,  velocity)  (from  either  RPAPRC  or  MPPRC) 

(g)  EP  averages  (density,  temperature)  (from  either  EPPRC  or  MPPRC) 
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(h)  Satellite  potential  information 

4.  As  data  are  available,  add  to  the  following  comparisons: 

(a)  SM  density  to  DM,  EP,  and  RPA  density 

(b)  DM  density  to  EP  and  RPA  density 

(c)  EP  density  to  RPA  density 

(d)  Compare  Tc  to  T:  (should  have  Te  2  T,) 

5.  Return  to  Subroutine  PROCES. 

d.  Outputs. 

1.  Argument  list. 

ISTAT  -  Return  status 

e.  Associated  subroutines. 

1.  Subroutine  SCDIAG.  Print  out  diagnostic  messages  concerning  changes  in  sensor  status  or  in 
processing  (see  2.4.4.7.1). 

2.  Function  AVRAGE.  Calculate  the  average  of  a  real  number.  If  the  input  count  is  zero,  set  the 
average  to  -1.0E37. 

3.  Function  IAVRGE.  Calculate  the  average  of  an  integer  number.  If  the  input  count  is  zero,  set 
the  average  to  -999999. 

4.  Subroutine  LDSTF.  Output  the  statistics  buffer  to  file  IESSTATFILE  (see  2.4.4.7.2). 

5.  Subroutine  QCRPA.  Extract  data  for  an  RPA  sweep  (see  2.4.4.7.3). 

6.  Subroutine  QCEP.  Extract  data  for  an  EP  sweep  (see  2.4.4.7.4). 

f.  Interfaces. 

1.  Called  from  Subroutine  PROCES. 

2.  Uses  COMMON  blocks  CKLANL,  D FRAME,  DMANL,  EPANL,  MPEANL,  MPIANL, 
PROCON,  RPAANL,  SATEPH,  SMANL,  and  SCSOH. 

2.4.4. 7.1  Subroutine  SCDIAG. 
a.  Function. 

Produce  diagnostic  print  for  following  the  status  of  the  SSIES  sensors  and  changes  in  processing 
status. 
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b.  Inputs. 

1.  Argument  list. 

THEEND  - 

2.  COMMON  blocks. 


End-of-data  flag 


/DFRAME/ 

IDTIME  - 

Time  of  current  data  frame  (seconds  since  midnight) 

ICYCLE  - 

Data  frame  cycle  ID  (1  or  2) 

ICCNTR  - 

Sweep  program  counter 

IQFRME  - 

Data  frame  quality  flag 

MODEP  - 

EP  sensor  mode  (0-6:  A-E) 

MONOLS  - 

OLS  command  from  last  cycle  1  data  frame 

MONDSM  - 

DSM  command  from  last  cycle  2  data  frame 

/PROCON/ 

IFLT 

Satellite  flight  ID 

NUMREV  - 

Readout  REV  number 

NEWSAT  - 

New  satellite  flag 

NEWREV  - 

New  readout  REV  flag 

GRESET  - 

General  reset  flag 

c.  Processing. 

1.  Generate  diagnostics  for  a  new  satellite/new  REV/general  reset/end-of-data  condition. 

2.  If  a  new  satellite  or  REV,  initialize  all  counters.  Otherwise,  increment  all  counters. 

3.  Alert  the  user  for  any  of  the  following: 

(a)  Duplicate/missing  frames 

(b)  Time  jumps 

(c)  Sweep  clock  jumps 

(d)  Calibration  sweeps 

(e)  OLS  command  changes 

(f)  EP  mode  changes 

(g)  DM  and  SM  sensor  command  changes 

4.  Return  to  Subroutine  QCPRC. 


d.  Outputs. 

This  routine  produces  one  line  diagnostic  messages  described  in  the  Programmer’s  Guide. 

e.  Associated  subroutines. 

1.  Function  BITON.  Determine  if  a  particular  bit  in  a  word  is  set  (see  2.4.8.2). 
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f.  Interfaces. 


1.  Called  from  Subroutine  QCPRC. 

2.  Uses  COMMON  blocks  D FRAME  and  PROCON. 


14.4.7.2  Subroutine  LDSTF. 

a.  Function. 

Load  the  REV  average  statistics  buffer  built  by  QCPRC  into  file  IESSTATFILE. 

b.  Inputs. 


1.  Argument  list. 


MSID 

IFLT 

IRMIN 

ISBUF 

Satellite  mission  ID 

Satellite  flight  ID 

Run  wall  time  (IES  minutes) 

Buffer  containing  the  statistics  for  output 

COMMON  blocks. 

/IONUM/ 

LUSTAT  - 

Logical  unit  for  file  IESSTATFILE 

/STATF/ 

MSIDSF  - 
IFLTSF 
LTMUPT  - 
LTMDIS  - 
NREVS  - 
ISFBUF  - 

Satellite  mission  ID 

Satellite  flight  ID 

Last  time  this  section  updated  (IES  Minutes) 
Last  time  this  section  listed  (IES  Minutes) 
Number  of  readout  REVs  stored  in  this  section 
Summary  statistics  for  up  to  18  REVs 

c.  Processing. 

1.  On  first  call,  build  a  directory  of  the  satellites  on  file  IESSTATFILE  and  their  location. 

2.  Determine  which  of  the  three  locations  in  the  file  corresponds  to  the  satellite  for  the  current  data. 

3.  If  no  location  is  currently  assigned  for  the  satellite  (new  satellite,  hopefully),  either  initialize  the 
next  empty  location,  or,  if  none  are  empty,  reinitialize  the  oldest  section  if  no  data  have  been 
loaded  into  that  section  in  the  past  10  days.  If  no  location  is  available  (highly  unlikely),  alert  the 
user  and  drop  the  summary  buffer  into  the  bit  bucket. 

4.  If  a  location  was  found,  read  in  the  entire  18  REV  record  for  that  location,  push  down  the  array, 
and  load  in  the  new  buffer. 

5.  Write  the  buffer  back  out  to  the  file. 
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6.  Build  an  HSP  summary  of  the  buffer  just  saved  (Subroutine  SFSUM). 

7.  Return  to  Subroutine  QCPRC. 

d.  Outputs. 

1.  Argument  list. 

ISTAT  -  Return  status 

2.  Files. 

IESSTATFILE.  File  to  which  a  new  summary  buffer  is  added. 

e.  Associated  subroutines. 

1.  Subroutine  FILERR.  File  error  contingency  routine  (see  2.4.8.5). 

2.  Subroutine  PRNTON.  Turn  on  the  PRINTAWAY  disable  switch  and  set  the  console  error  flag 
(see  2.4.8.11). 

3.  Subroutine  T1MCON.  Convert  to/from  IES  minutes  (see  2.4.8.12). 

4.  Subroutine  SFSUM.  Build  an  HSP  output  summary  of  a  summary  record  from  file 
IESSTATFILE  (see  2.4.6.1). 

f.  Interfaces. 

1.  Called-from  Subroutine  QCPRC. 

2.  Uses  COMMON  blocks  IONUM  and  STATF. 


2.4.4. 7.3  Subroutine  QCRPA. 

a.  Function. 

Select  the  data  required  for  Subroutine  QCPRC  from  an  RPA  sweep  analysis  from  either  the 
RPAPRC  or  MPPRC  modules. 

b.  Inputs. 

1.  Argument  list. 


ODEN 

0+  density 

HDEN 

Light  ion  density 

TI 

Ion  temperature 

UR 

Ion  ram  drift  velocity 

IADRP 

Average  total  ion  density 

NDRP 

Number  of  densities  in  average 

IATI 

Average  ion  temperature 

NTI 

Number  of  temperatures  in  average 
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IAUR  -  Average  ion  ram  drift  velocity 

NUR  -  Number  of  velocities  in  average 

c.  Processing. 

1.  Construct  the  total  ion  density  from  the  input  sweep  analyses. 

2.  If  the  ion  density,  temperature,  and  ram  drift  velocity  are  available,  add  them  to  their  respective 
sums,  set  the  output  values  to  the  input  values  for  each,  and  set  the  availability  flags. 

3.  Return  to  Subroutine  QCPRC. 

d.  Outputs. 


1.  Argument  list. 

RPDEN 

Total  ion  density 

IADRP 

Average  total  ion  density 

NDRP 

Number  of  densities  in  average 

GOTDRP  - 

Total  ion  density  available  flag 

RPTI 

Ion  temperature 

IATI 

Average  ion  temperature 

NTI 

Number  of  temperatures  in  average 

GOTTI 

Ion  temperature  available  flag 

IAUR 

Average  ion  ram  drift  velocity 

NUR 

Number  of  velocities  in  average 

Associated  subroutines. 

None, 
f.  Interfaces. 

1.  Called  from  Subroutine  QCPRC. 

2.  Uses  no  COMMON  blocks. 


2.4.4.7.4  Subroutine  QCEP. 

a.  Function. 

Select  the  data  required  for  Subroutine  QCPRC  from  an  EP  sweep  analysis  from  either  the 
EPPRC  or  MPPRC  modules. 

b.  Inputs. 

1.  Argument  list. 

IEPAR  -  Analysis  results  flag 

AEDEN  -  Average  electron  density  (from  DC  mode) 

EDEN  -  Electron  density  (from  sweep) 
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ETMP 

Electron  temperature 

SCPOT 

Satellite  potential 

IADEP 

REV  average  electron  density 

NDEP 

Number  of  densities  in  average 

I  ATE 

REV  average  electron  temperature 

NTE 

Number  of  temperatures  in  average 

AVEEPV  - 

REV  average  EP  analysis  satellite  potential 

NEPV 

Number  of  potentials  in  average 

c.  Processing. 

1.  If  DC  mode  data  are  available: 

(a)  Add  the  average  density  to  the  REV  averaged  sum  of  the  density. 

(b)  Set  the  output  EP  density  to  the  average  density. 

(c)  Set  the  data  availability  flags. 

2.  If  a  sweep  analysis  is  available: 

(a)  Add  electron  density,  temperature,  and  satellite  potential  to  the  REV  averages  if  they  are 
available. 

(b)  Set  the  output  EP  density,  temperature,  and  potential  to  the  input  values. 

(c)  Set  the  data  availability  flags. 

d.  Outputs. 

1.  Argument  list. 


EPDEN 

EP  electron  density 

IADEP 

REV  average  electron  density 

NDEP 

Number  of  densities  in  average 

GOTDEP  - 

EP  density  available  flag 

EPTE 

EP  electron  temperature 

IATE 

REV  average  electron  temperature 

NTE 

Number  of  temperatures  in  average 

GOTTE 

EP  temperature  available  flag 

AVEEPV  - 

REV  average  EP  analysis  satellite  potential 

NEPV 

Number  of  potentials  in  average 

EPSWP 

Sweep  data  flag 

Associated  subroutines. 

None, 
f.  Interfaces. 

1.  Called  from  Subroutine  QCPRC. 
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2.  Uses  no  COMMON  blocks. 


2.4.5  Subroutine  OUTPUT. 


a.  Function. 


Control  the  construction  and  output  of  SSIES  EDRs  to  file  IESEDRFILE  and  of  AGDB 
summary  records  to  a  transfer  file  (IESAGDBXFR1  or  IESAGDBXFR2).  Figure  17  is  a 
hierarchy  chart  for  this  module. 


OUTPUT: 

.  WRTEDR: 

. .  TIMCON: 

. .  PRNTON: 

. .  COPY: 

. .  EDRPRT: 

. .  .  OPNDOF: 
....  BITON: 
....  FILERR: 
....  PRNTON: 
.  .  FILERR: 

.  WRTXFR: 

.  .  LDXFR: 

.  .  XFRPRT: 

.  .  .  OPNDOF: 
....  BITON: 
....  FILERR: 
....  PRNTON: 
.  .  COPY: 

.  .  PRNTON: 

.  .  FILERR: 

.  SETEDR: 

.  .  PRNTON: 

.  .  TIMCON: 

.  .  COPY: 

. .  FILERR: 

.  LDEDR: 

.  .  COPY: 

.  .  LDSWPS: 


generate  IESEDRFILE  and  IESAGDBXFR  records 
write  EDRs  to  output 

convert  between  UT  and  IES  reference  minutes 
set  PRINTAWAY  status  for  end  of  processing 
initialize  or  transfer  values  between  arrays 
generate  an  EDR  summary  text  report 
initialize  diagnostic  output  file 
test  for  bit  setting 

determine  and  report  file  error  status 
set  PRINTAWAY  status  for  end  of  processing 
determine  and  report  file  error  status 
process  AGDB  summary  records 
generate  AGDB  record  from  EDR 
generate  an  AGDB  record  text  report 
initialize  diagnostic  output  file 
test  for  bit  setting 

determine  and  report  file  error  status 
set  PRINTAWAY  status  for  end  of  processing 
initialize  or  transfer  values  between  arrays 
set  PRINTAWAY  status  for  end  of  processing 
determine  and  report  file  error  status 
initialize  EDR  segments  for  IESEDRFILE 
set  PRINTAWAY  status  for  end  of  processing 
convert  between  UT  and  IES  reference  minutes 
initialize  or  transfer  values  between  arrays 
determine  and  report  file  error  status 
store  processed  data  into  EDR  output  arrays 
initialize  or  transfer  values  between  arrays 
acquire  EP  or  RPA  results  for  EDR 


Figure  17  OUTPUT  module  hierarchy  chart 


b.  Inputs. 

1.  Argument  list. 

THEEND  -  End-of-data  flag  (LOGICAL) 
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2.  COMMON  blocks. 


/DFRAME/ 

IQFRME  -  Data  frame  quality  flag 
/EDRREC/ 

NPTEDR  -  EDR  load  buffer  pointer 

EDR  -  EDR  load  buffer 


/PROCON/ 


IFLT 

IEDDGP 

IAGDGP 

NEWSAT 

NEWREV 


Satellite  flight  ID 

EDR  diagnostic  print  flag 

AGDB  summary  record  diagnostic  print  flag 

New  satellite  flag 

New  readout  REV  flag 


/SATEPH/ 


ITEDR  -  EDR  times  from  ephemeris  (seconds  since  midnight) 

IYMD  -  EDR  dates  from  ephemeris  (YYMMDD) 


c.  Processing. 

1.  Set  local  reset  flags  based  on  the  new  satellite,  new  REV,  and  end-of-data  flags.  If  the  current 
data  frame  was  bad,  return  to  the  main  routine. 

2.  If  the  local  reset  flag  is  set,  then: 

(a)  If  this  is  not  the  first  time  through  this  routine,  output  the  current  EDR  I/O  buffer 
(Subroutine  WRTEDR)  and  build  and  output  an  AGDB  summary  record  (WRTXFR).  If 
there  are  no  more  data,  return  to  the  main  routine.  If  any  errors  were  encountered,  set  the 
return  status  to  -1  and  return  to  the  main  routine. 

(b)  Set  up  a  new  EDR  load  buffer  and  EDR  I/O  buffer  for  the  new  satellite  or  REV  (Subroutine 
SETEDR).  If  any  errors  were  encountered,  set  the  return  status  to  -1  and  return  to  the  main 
routine. 

3.  Load  the  data-processed  from  the  current  data  frame  into  the  EDR  load  buffer  (Subroutine 
LDEDR). 

4.  If  an  EDR  has  been  completed  and  is  ready  for  output  (based  on  variable  DONE  returned  from 
Subroutine  LDEDR),  output  the  EDR  (Subroutine  WRTEDR),  and  build  and  output  an  AGDB 
summary  record  (Subroutine  WRTXFR).  If  any  errors  were  encountered,  set  the  return  status  to 
-1  and  return  to  the  main  routine. 

5.  Set  the  return  status  to  zero  and  return  to  the  main  routine. 
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d.  Outputs. 


1.  Argument  list. 

ISTAT  -  Return  status 

e.  Associated  subroutines. 

1.  Subroutine  WRTEDR.  Control  output  of  EDRs  to  file  IESEDRFILE  (see  2.4.5.1). 

2.  Subroutine  WRTXFR.  Control  construction  and  output  of  AGDB  summary  records  to  the 
transfer  file  (see  2.4.5.2). 

3.  Subroutine  SETEDR.  Initialize  the  EDR  load  and  I/O  buffers  (see  2.4.5.3). 

4.  Subroutine  LDEDR.  Load  data  from  the  analysis  COMMON  blocks  into  the  EDR  load  buffer 
(see  2.4.5.4). 

f.  Interfaces. 

1.  Called  from  the  main  routine. 

2.  Uses  COMMON  blocks  D FRAME,  EDRREC,  PROCON,  and  SATEPH. 


2.4.5. 1  Subroutine  WRTEDR. 


a.  Function. 


Control  EDR  output  to  file  IESEDRFILE. 


b.  Inputs. 


1.  Argument  list. 

RESET 

EDR 

IEDR 

IDIAG 


Local  reset  flag  (see  OUTPUT) 

EDR  to  be  output  (REAL) 

EDR  to  be  output  (INTEGER,  Equivalenced  to  EDR) 
EDR  diagnostic  print  flag 


2.  COMMON  blocks. 


/EDRWRK/ 


NHREC 

IHEDR 

IBPFLG 

NREC 

IOEDR 


File  record  number  for  current  satellite  header 
File  header  for  current  satellite 
EDR  I/O  buffer  processing  status  flags 
File  record  number  for  current  EDR  I/O  record 
Current  EDR  I/O  record 
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/IONUM/ 


LUEDR  -  Logical  unit  for  file  IESEDRFILE 

/CFINFO/ 

IENREC  -  Number  of  I/O  records  per  satellite  in  IESEDRFILE 

3.  Files. 

EDR  I/O  buffers  are  input  from  file  IESEDRFILE. 

c.  Processing. 

1.  Determine  the  location  of  the  EDR  I/O  record  in  which  the  new  EDR  should  be  stored.  If  the 
location  is  negative,  indicating  that  the  EDR  is  for  a  time  previous  to  the  oldest  data  in  the  file, 
alert  the  user  and  return  to  Subroutine  OUTPUT  without  storing  the  EDR  in  file  IESEDRFILE. 

2.  If  the  time  in  the  EDR  leads  to  an  erroneous  file  address,  indicating  a  possible  bad  time  in  the 
EDR,  alert  the  user  and  return  to  Subroutine  OUTPUT  without  storing  the  EDR  in  file 
IESEDRFILE. 

3.  If  the  new  EDR  does  not  go  in  the  EDR  I/O  buffer  currently  in  COMMON  EDRWRK,  then 
write  the  current  I/O  buffer  out  to  file  IESEDRFILE  and  reinitialize  the  I/O  buffer: 

(a)  If  the  new  EDR  belongs  in  an  I/O  buffer  which  is  already  in  the  file  and  has  data  in  it,  read  in 
that  I/O  buffer,  or 

(b)  Set  up  a  new  I/O  buffer  by  zeroing  out  the  six  processing  words  located  in  the  first  six 
locations  in  the  EDR  I/O  buffer. 

4.  Copy  the  new  EDR  into  the  proper  location  in  the  I/O  buffer. 

5.  If  this  is  the  last  EDR  for  the  current  satellite/REV,  then: 

(a)  output  the  current  EDR  I/O  buffer, 

(b)  update  the  oldest/latest  data  flags  in  the  header  block, 

(c)  output  the  header  block. 

6.  If  requested  by  the  user,  write  out  an  ASCII  list  of  the  EDR  just  processed  (Subroutine 
EDRPRT). 

7.  Set  the  return  status  to  zero  and  return  to  Subroutine  OUTPUT. 

d.  Outputs. 

1.  Argument  list. 

ISTAT  -  Return  status 
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2. 


COMMON  blocks. 


/EDRWRK/ 


IHEDR 

IBPFLG 

NREC 

IOEDR 


File  header  for  current  satellite 
EDR  I/O  buffer  processing  status  flags 
File  record  number  for  current  EDR  I/O  record 
Current  EDR  I/O  record 


3.  Files. 

EDR  I/O  buffers  and  the  header  block  are  output  to  file  IESEDRFILE. 


e.  Associated  subroutines. 


1.  Subroutine  FILERR.  File  error  diagnostic  control  routine  (see  2. 4.8.5). 

2.  Subroutine  TIMCON.  Convert  between  date/time  and  IES  minutes  (see  2.4.8.12). 

3.  Subroutine  PRNTON.  Disable  the  PRINTAWAY  processor  and  set  the  console  error  message 
flag  (see  2.4.8.11). 

4.  Subroutine  EDRPRT.  Write  an  ASCII-format  list  of  an  EDR  to  a  diagnostic  output  file  (see 
2.4.5.1.1). 

f.  Interfaces. 

1.  Called  from  Subroutine  OUTPUT. 

2.  Uses  COMMON  blocks  EDRWRK,  IONUM,  and  CFINFO. 


2.4.5.1.1  Subroutine  EDRPRT. 

a.  Function. 

Build  and  output  an  ASCII-format  EDR  summary  print. 

b.  Inputs. 

1.  Argument  list. 


IDIAG 

Diagnostic  print  flag 

EDR 

EDR  to  display  (REAL) 

IEDR 

EDR  to  display  (INTEGER,  Equivalenced  to  EDR) 

NRS 

Record  number  for  current  EDR  I/O  buffer 

NRW 

Record  number  for  last  output  EDR  I/O  buffer 

NHREC  - 

Record  number  of  EDR  file  header  information 

NEDR 

EDR  work  array  pointer 

IHEDR 

File  header  for  current  satellite 

IWRT 

EDR  I/O  output  flag 

FINAL 

Last  EDR  flag 
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2.  COMMON  blocks. 


/LUDIAG/ 

LUEDRA  -  Logical  unit  for  EDR  diagnostic  output  file 

/CKLANL/ 

DFREQ  -  Frequencies  in  decimated  PDS  (Hertz) 

c.  Processing. 

1.  On  first  call  to  this  routine,  open  the  diagnostic  output  file  (Subroutine  OPNDOF).  If  this  fails, 
set  the  diagnostic  print  flag  to  zero  so  that  no  further  attempts  will  be  made  to  output  EDR  to  a 
diagnostic  print  file. 

2.  Write  out  header  information  for  the  EDR  I/O  buffer. 

3.  If  the  current  EDR  is  not  to  be  listed  (controlled  by  the  value  of  IDIAG),  return  to  Subroutine 
WRTEDR. 

4.  Write  out  the  EDR. 

5.  Return  to  Subroutine  WRTEDR. 

d.  Outputs. 

Figure  30  (section  4.4.5)  illustrates  an  EDR  diagnostic  output. 

1.  Argument  list. 

IDIAG  -  Set  to  zero  if  the  output  file  is  bad 

2.  COMMON  Blocks. 

None. 

e.  Associated  routines. 

1.  Subroutine  OPNDOF.  Open  a  diagnostic  output  file  (see  2.4.8.9). 

f.  Interfaces. 

1.  Called  from  Subroutine  WRTEDR. 

2.  Uses  COMMON  blocks  LUDIAG  and  CKLANL. 
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2.4.5.2  Subroutine  WRTXFR. 


a.  Function. 

Build  and  output  EDR  summary  records. 

NOTE:  The  transfer  file  is  a  remnant  of  GWC  processing  and  could  probably  be  eliminated  for 
SFC  purposes.  (See  Subroutine  OPNXFR  2.4.2. 7,  for  related  comments.) 


b.  Inputs. 


Argument  list. 

RESET 

EDR 

IEDR 

FINAL 

IDIAG 

Local  reset  flag  (see  OUTPUT) 

EDR  to  summarize  (REAL) 

EDR  to  summarize  (INTEGER,  Equivalenced 
Last  EDR  flag 

Diagnostic  output  flag 

COMMON  blocks. 

/IONUM/ 

LUXFR  - 

Logical  unit  for  file  IESAGDBXFRn 

/LUDIAG/ 

LUXFRA  - 

Logical  unit  for  diagnostic  output 

/PROCON/ 

IFLT 

NFXFR 

IRDATE  - 
IRTIME  - 

Satellite  flight  ID 

Transfer  file  number  (1  or  2) 

Current  run  date  (YYMMDD) 

Current  run  time  (HHMMSS) 

3.  Files. 

The  header  buffer  is  input  from  file  IESAGDBXFRn. 

c.  Processing 

1.  On  first  call  to  this  routine,  set  up  the  header  buffer  in  the  first  22  words  of  the  first  I/O 
buffer. 

2.  If  the  transfer  file  is  not  yet  full,  then: 

(a)  Extract  a  summary  record  from  the  current  EDR  and  load  it  into  the  I/O  buffer 
(Subroutine  LDXFR), 

(b)  If  requested  by  the  user,  write  a  copy  of  the  summary  record  to  an  ASCII  diagnostic  file 
(Subroutine  XFRPRT), 
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(c)  If  the  I/O  buffer  is  full,  write  it  out  to  the  transfer  file  selected  in  Subroutine  OPNXFR, 

(d)  Increment  the  report  counter  in  the  header  array. 

3.  If  the  transfer  file  is  full,  extract  a  summary  record  from  the  current  EDR,  write  out  an  ASCII 
print  of  the  summary  record,  and  increment  the  lost  records  counter  (LOST). 

4.  If  this  is  the  final  EDR,  then: 

(a)  Output  the  current  I/O  buffer, 

(b)  Input  the  header  record,  update  it  as  necessary,  and  write  it  back  to  the  file, 

(c)  If  there  were  lost  records  due  to  file  overflow,  alert  the  user, 

(d)  Return  to  Subroutine  OUTPUT. 

5.  If  the  next  EDR  will  be  for  a  new  satellite,  update  the  header  to  show  the  start  of  data  from  a 
new  satellite. 

6.  Return  to  Subroutine  OUTPUT. 

d.  Outputs. 

1.  Argument  list. 

ISTAT  -  Return  status 

2.  Files. 

EDR  summary  records  are  written  to  the  transfer  file  (IESAGDBXFR1  or  IESAGDBXFR2). 

e.  Associated  subroutines. 

1.  Subroutine  LDXFR.  Extract  a  summary  record  for  the  AGDB  from  an  EDR  (see  2.4.5.2.1). 

2.  Subroutine  FILERR.  File  error  diagnostic  control  routine  (see  2.4.8.5). 

3.  Subroutine  PRNTON.  Disable  the  PRINTAWAY  processor  and  set  the  console  error  message 
flag  (see  2.4.8.11). 

4.  Subroutine  XFRPRT.  Write  an  ASCII  formal  list  of  an  EDR  summary  record  to  a  diagnostic 
output  file  (see  2.4.5.2.2). 

f.  Interfaces. 

1.  Called  from  Subroutine  OUTPUT. 

2.  Uses  COMMON  blocks  IONUM  and  PROCON. 
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2. 4.5.2. 1  Subroutine  LDXFR. 


a.  Function. 

Build  EDR  summary  records  for  the  AGDB. 

b.  Inputs. 

1.  Argument  list. 

EDR  -  EDR  to  summarize  (REAL) 

IEDR  -  EDR  to  summarize  (INTEGER,  Equivalenced  to  EDR) 

c.  Processing. 

1.  Load  satellite  flight  ID,  date,  time,  geographic  latitude,  and  geographic  longitude  from  the  EDR 
into  the  summary  record. 

2.  Calculate  and  load  the  following  averages: 

(a)  plasma  density, 

(b)  ion  ratio  (ratio  of  0+  density  to  light  ion  density), 

(c)  ion  temperature,  and 

(d)  electron  temperature. 

3.  Extract  and  load  the  CkL,  p„  and  analysis  information  for  each  CkL  analysis. 

4.  Return  to  Subroutine  WRTXFR. 

d.  Outputs. 

1.  Argument  list. 

AGBUF  -  Summary  record  buffer  (REAL) 

IAGBUF  -  Summary  record  buffer  (INTEGER,  Equivalenced  to  AGBUF) 

e.  Associated  subroutines. 

None. 

f.  Interfaces. 

1.  Called  from  Subroutine  WRTXFR. 

2.  Uses  no  COMMON  blocks. 
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2.4.5.22  Subroutine  XFRPRT. 

a.  Function. 


Write  an  AGDB  summary  record  to  an  ASCII  format  diagnostic  output  file. 


b.  Inputs. 


1.  Argument  list. 


AGBUF 
IAGBUF 
ID  IAG 


Summary  record  buffer  (REAL) 

Summary  record  buffer  (INTEGER,  Equivalenced  to  AGBUF) 
Diagnostic  print  flag 


2.  COMMON  blocks. 


/LUDIAG/ 

LUXFRA  -  Logical  unit  for  diagnostic  output  file 


c.  Processing. 

1.  On  first  call  to  this  routine,  open  the  diagnostic  output  file  (Subroutine  OPNDOF).  If  this  fails, 
set  the  diagnostic  print  flag  to  zero  so  that  no  further  attempts  will  be  made  to  output  EDR  to  a 
diagnostic  print  file. 

2.  Write  out  the  ASCII  format  record. 

3.  Return  to  Subroutine  WRTXFR. 


d.  Outputs. 

Figure  33  (section  4.4.5)  illustrates  the  format  of  a  single  AGDB  summary  record  as  output  by  this 
routine. 

1.  Argument  list. 

IDIAG  -  Set  to  zero  if  the  output  file  is  bad 

e.  Associated  subroutines. 

None. 

f.  Interfaces. 

1.  Called  from  Subroutine  WRTXFR. 

2.  Uses  COMMON  block  LUDIAG. 
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2.4.53  Subroutine  SETEDR. 


a.  Function. 

Interface  with  file  IESEDRFILE  to  initialize  EDR  I/O  buffers  at  the  start  of  processing  data  from 
either  a  new  satellite  or  a  new  readout  REV. 

NOTE:  Most  (if  not  all)  of  the  logic  in  this  routine  is  based  upon  requirements  for  the  AFGWC 
processing  system  and  can  be  eliminated  for  production  processing  at  AFSFC.  The  salient 
points  to  consider  are: 

1.  The  GWC  input  stream  could  (and  did)  contain  data  for  multiple  revs  of  multiple 
satellites.  The  EDR  output  processing  was  designed  to  segregate  the  processing 
results  from  each  satellite  into  its  own  database  storage  area.  The  SFC  input 
stream  contains  one  rev  of  data  for  one  satellite. 

2.  The  GWC  input  stream  data  was  not  properly  time  ordered.  The  EDR  output 
processing  was  designed  to  write  the  processing  results  to  the  database  file  in  time 
ascending  order.  The  SFC  input  stream  data  begins  at  the  start  time  of  the  rev 
and  progresses  in  correct  time  order  to  the  end  of  the  rev. 

See  Subroutine  OPNEDR  2.4.2.5  for  related  comments. 


b.  Inputs. 


1.  Argument  list. 


NEWSAT 

IFLT 

IDATE 

ITIME 


New  satellite  flag 
Satellite  flight  ID 

Date  of  EDR  required  for  current  data  frame  (YYMMDD) 
Time  of  EDR  required  for  current  data  frame  (HHMM) 


2.  COMMON  blocks. 


/CFINFO/ 

IENREC  -  Number  of  I/O  records  per  satellite  in  IESEDRFILE 
/IONUM/ 

LUEDR  -  Logical  unit  for  IESEDRFILE 


3.  Files. 


(a)  IESEDRFILE.  The  header  block  for  the  satellite  specified  by  variable  IFLT  and  the  EDR  I/O 
block  (if  it  exists)  specified  by  variables  IDATE  and  ITIME  are  input. 

c.  Processing. 

1.  If  the  initialization  is  for  a  new  satellite  (or  at  the  start  of  a  program  run): 

(a)  Search  through  the  EDR  file  header  blocks  for  the  header  block  for  satellite  IFLT  and  input 
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it.  If  none  is  found,  alert  the  user  (Subroutine  PRNTON),  set  the  return  status  to  -1,  and 
return  to  Subroutine  OUTPUT. 

(b)  If  the  file  has  been  reinitialized,  set  up  the  header  block  for  satellite  IFLT  based  on  date 
IDATE  and  time  ITIME. 

2.  Determine  where  in  the  file  data  from  the  current  REV  should  be  placed,  and  set  up  the  EDR 

load  and  I/O  buffers  as  follows: 

(a)  If  the  data  are  from  a  time  prior  to  the  oldest  time  in  the  EDR  file,  write  out  a  warning 
message.  If  the  data  are  over  120  minutes  old,  flag  this  as  an  error.  Continue  processing  by 
filling  the  EDR  load  buffer  with  missing  data  flags  (-1.0E37),  zeroing  the  EDR  I/O  buffer 
processing  status  flags  (IOEDR),  and  setting  the  EDR  load  buffer  pointer  (NPTEDR)  to  -1. 

(b)  If  the  data  time  is  between  the  oldest  and  latest  times  in  the  EDR  file,  input  the  EDR  I/O 
record  which  includes  the  current  date  (IDATE)  and  time  (ITIME).  If  a  valid  EDR  for  the 
current  date  and  time  is  found  in  the  EDR  I/O  buffer,  it  is  copied  into  the  EDR  load  buffer 
and  the  EDR  load  buffer  pointer  (NPTEDR)  is  initialized  to  1.  If  no  EDR  is  found,  initialize 
the  EDR  load  buffer  by  filling  it  with  missing  data  flags  and  set  NPTEDR  to  -1. 

(c)  If  the  data  time  is  beyond  the  time  in  the  EDR  file,  the  file  is  brought  up  to  the  current 
date/time  by  zeroing  all  processing  flags  in  the  header  (IBPFLG)  corresponding  to  EDR  I/O 
buffers  between  the  latest  time  in  the  file  and  the  time  of  the  current  data.  Initialize  the  EDR 
load  buffer  by  filling  it  with  missing  data  flags  and  set  NPTEDR  to  -1,  and  zero  out  the 
processing  status  flags  in  the  EDR  I/O  buffer  (IOEDR). 


3. 

Set  the  return  status  to  zero,  and  return  to  Subroutine  OUTPUT. 

Outputs. 

1. 

Argument  list. 

ISTAT 

Return  status 

2. 

COMMON  blocks. 

/EDRREC/ 

NPTEDR  - 

EDR  load  buffer  pointer 

EDR 

EDR  load  buffer 

/EDRWRK/ 

NHREC  - 

File  record  number  for  current  satellite  header 

IHEDR 

File  header  for  current  satellite 

IBPFLG  - 

EDR  I/O  buffer  processing  status  flags 

NREC 

File  record  number  for  current  EDR  I/O  record 

IOEDR 

Current  EDR  I/O  record 

Associated  subroutines. 

1. 

Subroutine  FILERR. 

File  error  diagnostic  control  routine  (see  2.4.8.5). 
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2.  Subroutine  TIMCON.  Convert  between  date/time  and  IES  minutes  (see  2.4.8.12). 

3.  Subroutine  PRNTON.  Disable  the  PR1NTAWAY  processor  and  set  the  console  error  message 
flag  (see  2.4.8.11). 

f.  Interfaces. 

1.  Called  from  Subroutine  OUTPUT. 

2.  Uses  COMMON  blocks  CFINFO,  EDRREC,  EDRWRK,  and  IONUM. 


2.4.5.4  Subroutine  LDEDR 


a.  Function. 


Load  the  analysis  results  from  the  six  processor  routines  (EPPRC,  RPAPRC,  MPPRC,  DMPRC, 
SMPRC,  and  CKLPRC)  into  an  Environmental  Data  Record  (EDR). 


b.  Inputs. 

1.  Argument  list. 

RESET 

GONE 

2.  COMMON  blocks. 

/CKLANL/ 

DNON 

CKL 

T1 

PI 

DPDS 

ICKLAR  - 

/D  FRAME/ 

IDTIME  - 
IQFRME  - 
MODEP  - 
VBIAS 

/DMANL/ 

DMAUH  - 
DMAUV  - 
DMIDEN  - 
IDMAR 


New  satellite/REV  switch  (LOGICAL) 
Indicator  that  an  EDR  has  been  output 


(RMS  AN)/N  (%) 

Height-integrated  irregularity  strength  (CkL) 
Value  of  log-linear  PDS  fit  at  f=lHz 
Slope  of  log-linear  PDS  fit 
Decimated  power  density  spectrum 
CkL  analysis  results  flag 


Time  of  current  data  frame  (seconds  since  midnight) 

Bad  frame  flag 

EP  sensor  mode  (0-6:  A-E) 

Ion  sensor  bias  voltage  (volts) 


Average  horizontal,  cross-track  drift  velocity  (meters/sec) 
Average  vertical,  cross-track  ion  drift  velocity  (meters/sec) 
Ion  density  (ion/cm3) 

DM  analysis  results  flag 
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/EDRREC/ 


NPTEDR  - 

EDR  load  buffer  pointer 

/EPANL/ 

IEPTME  - 
EPEDEN  - 
EPADEN  - 
EPETMP  - 
EPVPOT  - 
IEPAR 

Center  time  of  EP  sweep  (sec  since  midnight) 
EP  DC  mode  electron  densities  (el/cm3) 

EP  average  electron  density  (el/cm3) 

EP  electron  temperature  (°K) 

EP  analysis  of  spacecraft  potential  (volts) 

EP  analysis  results  flag 

/MPEANL/ 

METIME  - 
EDENMP  - 
ETMP 

SPEPMP  - 
MPEFLG  - 
IMPEAR  - 

Center  time  of  EP  sweep  (sec  since  midnight) 
MP  electron  density  (el/cm3) 

MP  electron  temperature  (°K) 

MP  EP  analysis  of  spacecraft  potential  (volts) 
MP  EP  analysis  flags 

MP  EP  analysis  results  flag 

/MPIANL/ 

MITIME  - 
OOENMP  - 
OTMP 
HDENMP  - 
IMPLIF  - 
URMP 

MPIFLG  - 
IMPIAR  - 

Center  time  of  RPA  Sweep  (sec  since  midnight) 
MP  0+  ion  density  (ion/cm3) 

MP  0+  ion  temperature  (°K) 

MP  H+  ion  density  (ion/cm3) 

MP  light  ion  flag 

MP  ram  ion  velocity  (meters/sec) 

MP  RPA  analysis  flags 

MP  RPA  analysis  results  flag 

/PROCON/ 

IFLT 

IDBEP 

IDBRP 

ISWNE 

ISWVP 

ISWCRL 


Flight  number 
MP/EP  results  use  flag 

1:  Use  results  from  EPPRC 
2:  Use  results  from  MPPRC  (EP) 
MP/RPA  results  use  flag 

1:  Use  results  from  RPAPRC 
2:  Use  results  from  MPPRC  (RPA) 
Primary  source  of  electron  density 
1:  SM  sensor 
2:  DM  sensor 

3:  EP  sensor  (mode  C  or  D  only) 
Primary  source  for  vehicle  potential 
Primary  source  of  data  for  CkL 
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/RPAANL/ 


IRPTME 

RPHDEN 

RPODEN 

RPITMP 

IRPLIF 

RPAUR 

IRPAR 


Center  time  of  RPA  sweep  (sec  since  midnight) 
RPA  H+  ion  density  (ion/cm2 3 4) 

RPA  0+  ion  density  (ion/cm3) 

RPA  ion  temperature  (°K) 

Light  ion  flag 

RPA  ion  ram  velocity  (meters/sec) 

RPA  analysis  results  flag 


/SATEPH/ 


ITEDR 

IYMD 

GLAT 

GLON 

APXLAT 

APXLON 

APXLT 

ALTSC 


EDR  times  (sec  since  midnight) 
Date  (YYMMDD) 

Geographic  latitude  (deg) 
Geographic  longitude  (deg) 
Apex  latitude  (deg) 

Apex  longitude  (deg) 

Apex  local  time  (hours) 

Satellite  altitude  (km) 


/SCSOH/ 


ADCTMP 

DMYO 

DSMTMP 

/SMANL/ 

SMADEN 

ISMAR 


ADC  electronics  temperature 
DM  sensor  offset  voltage  reference  (volts) 
DM/SM  electronics  temperature 


SM  average  ion  density  (ion/cm3) 
SM  analysis  results  flag 


c.  Processing. 

1.  If  the  EDR  load  buffer  (EDR)  has  just  been  initialized  by  Subroutine  SETEDR  (NPTEDR  =  -1), 
initialize  all  internal  flags  and  jump  down  to  step  6. 

2.  If  this  is  a  reset  for  a  new  REV,  set  the  load  buffer  pointer  (NPTEDR)  to  the  other  section  of  the 
buffer. 

3.  If  the  current  data  frame  is  bad,  jump  down  to  step  7. 

4.  If  the  current  time  (in  IDTIME)  is  beyond  the  time  span  of  the  current  EDR,  then: 

(a)  Determine  the  location  of  IDTIME  with  respect  to  the  times  in  the  ephemeris  arrays, 

(b)  Set  the  DONE/GONE  control  flags  as  follows: 

(1)  If  the  EDR  in  the  inactive  section  of  the  EDR  load  buffer  has  been  output  to  the  EDR 
I/O  buffer  (GONE  =  .TRUE.),  flip  the  EDR  load  buffer  pointer.  If  the  current  time  is 
less  than  six  seconds  past  the  end  time  of  the  last  EDR,  set  both  DONE  and  GONE  to 
.FALSE.,  otherwise  set  both  to  .TRUE.. 
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(2)  If  the  EDR  in  the  inactive  section  has  not  been  output  (which  indicates  a  large  time  jump 
in  the  current  IDTIME),  do  not  flip  the  pointer  (thus  overwriting  the  latest  EDR  which 
will  contain  much  less  data  than  the  EDR  in  the  inactive  section)  and  set  DONE  and 
GONE  to  .TRUE.. 

5.  If  the  current  time  is  within  the  time  covered  by  the  current  EDR,  and  the  last  EDR  has  not  yet 
been  output  and  the  current  time  is  more  than  six  seconds  beyond  the  end  of  the  last  EDR,  set 
DONE  and  GONE  to  .TRUE..  Otherwise,  set  DONE  to  .FALSE.. 

6.  If  the  new  EDR  is  required  (from  step  4),  load  missing-data  indicators  into  the  EDR  work  array 
and  load  the  ephemeris  data,  miscellaneous  information,  and  engineering  data  into  the  new  EDR. 
If  the  EDR  is  not  new,  check  for  a  change  in  EP  mode  to/from  a  non-sweep  (DC)  mode.  If  the 
mode  has  changed,  reinitialize  the  EP  section  of  the  current  EDR  for  the  new  mode  output. 

7.  If  an  analysis  is  available  from  the  CKL  module,  load  it  into  the  appropriate  EDR. 

8.  If  the  MP  analyses  for  the  EP  or  RPA  sweeps  are  to  be  loaded  in  the  EDR,  and  they  are 
available,  load  the  analyses  as  required  (Subroutine  LDSWPS). 

9.  If  the  current  frame  is  bad,  return  to  Subroutine  OUTPUT. 

10.  Load  the  spacecraft  potential. 

11.  Load  the  density  data  from  the  SM  sensor. 

12.  Load  the  density  and  drift  velocity  data  from  the  DM  sensor. 

13.  If  the  EP  analyses  from  module  EPPRC  are  to  be  used  in  the  EDRs,  and  an  analysis  is  available, 
load  the  EP  data  (Subroutine  LDSWPS). 

14.  If  the  RPA  analyses  from  module  RPAPRC  are  to  be  used  in  the  EDRs,  and  an  analysis  is 
available,  load  the  RPA  data  (Subroutine  LDSWPS). 

15.  Return  to  Subroutine  OUTPUT. 

d.  Outputs 

1.  Argument  list. 

DONE  -  Indicator  that  an  EDR  is  ready  for  output 

GONE  -  Indicator  that  an  EDR  has  been  output 

2.  COMMON  blocks. 

/EDRREC/ 

NPTEDR  -  EDR  load  buffer  pointer 

EDR  -  EDR  load  buffer 

e.  Associated  subroutines. 

1.  Subroutine  LDSWPS.  Load  an  EP  or  RPA  sweep  analysis  into  the  EDR  load  buffer  (see 
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2. 4.5.4. 1). 


f.  Interfaces. 

1.  Called  from  Subroutine  OUTPUT. 

2.  Uses  COMMON  blocks  CKLANL,  D FRAME,  DMANL,  EDRREC,  EPANL,  MPEANL, 
MPIANL,  PROCON,  RPAANL,  SATEPH,  SCSOH,  and  SMANL. 

2.4.5.4.1  Subroutine  LDSWPS. 

a.  Function. 

Load  data  from  either  EP  or  RPA  sweep  analyses  into  an  EDR. 

b.  Inputs. 

1.  Argument  list. 


ITYPE 

Sweep  type  (1:  EP,  2:  RPA) 

IESEC 

Time  of  current  EDR  buffer  (seconds  since  midnight) 

ITIME 

Sweep  center  time  (seconds  since  midnight) 

DENI 

Electron  or  04-  density 

DEN2 

Light  ion  density 

TEMP 

Electron  or  ion  temperature 

POT 

Satellite  potential 

LIF 

Light  ion  flag 

UR 

Ram  ion  drift  velocity 

IQUAL 

Analysis  qualifier 

IEND 

Location  of  EP  sweeps  (DC  modes  only) 

2.  COMMON  blocks. 

/EDRREC/ 

NPTEDR  -  EDR  load  buffer  pointer 

c.  Processing. 

1.  Determine  in  which  EDR  in  the  EDR  load  buffer  the  current  sweep  should  be  stored,  and  the 
location  within  that  EDR  (N). 

2.  If  an  EP  sweep,  adjust  N  for  DC  mode  sweeps  and  load  the  sweep  analysis  in  the  EDR. 

3.  If  an  RPA  sweep,  load  the  sweep  analysis  in  the  EDR.  * 

4.  Return  to  Subroutine  LDEDR. 
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d.  Outputs. 

1.  COMMON  blocks. 

/EDRREC/ 

EDR  -  EDR  load  buffer 

e.  Associated  subroutines. 

None. 

f.  Interfaces. 

1.  Called  from  Subroutine  LDEDR. 

2.  Uses  COMMON  block  EDRREC. 


2.4.6  Subroutine  SUMOUT. 

a.  Function. 

Build  all  end-of-run  summary  prints  as  necessary. 

b.  Inputs. 

1.  COMMON  blocks. 


/IONUM/ 

LUSTAT  - 

Logical  unit  for  file  IESSTATFILE 

/LUDIAG/ 

LUMPEP  - 
LUMPRP  - 
LUDMHP  - 

Logical  unit  for  MPPRC  EP  comparison  output 
Logical  unit  for  MPPRC  RPA  comparison  output 
Logical  unit  for  DM  H+  mode  output 

/PROCON/ 

INTSUM  - 
IMPDGP  - 
IRMIN 

Processing  statistics  summary  interval  (hours) 
MPPRC  diagnostic  output  flag 

Wall  time  of  current  run  (IES  minutes) 

2.  Files. 

IESSTATFILE.  The  REV  average  processing  statistics  are  read  in  from  file  IESSTATFILE  for 
display  if  the  time  since  the  last  display  is  greater  than  the  user  set  display  interval. 

IESDMHPMODE.  The  print  from  this  diagnostic  output  file  for  DM  H+  mode  data  is 
transferred  to  the  HSP  file  if  user-requested. 
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IESMPEPPRT.  The  print  from  this  diagnostic  output  file,  containing  comparisons  of  MP 
analyses  of  EP  sweeps  to  EP  sweep  analyses  from  module  EPPRC,  is  transferred  to  the  HSP 
file  if  user-requested. 

IESMPRPAPRT.  The  print  from  this  diagnostic  output  file,  containing  comparisons  of  MP 
analyses  of  RPA  sweeps  to  RPA  sweep  analyses  from  module  EPPRC,  is  transferred  to  the 
HSP  file  if  user-requested. 

c.  Processing. 

1.  Check  the  last-time-displayed  variable  (LTMDIS)  in  all  three  sections  of  file  IESSTATFILE.  If 
the  time  since  the  last  display  is  less  than  the  interval  between  summaries  specified  by  the  user 
(variable  INTSUM),  generate  a  full  summary  for  that  section  (Subroutine  SFSUM). 

2.  If  any  data  have  been  output  to  the  DM  H+  mode  diagnostic  output  file  (IESDMHPMODE), 
transfer  the  output  to  HSP  (Subroutine  IESPRT). 

3.  If  the  user  has  specified  that  the  MP  sweep  analysis  comparison  files  (IESMPEPPRT  and 

IESMPRPAPRT)  are  to  be  printed  in  the  HSP,  transfer  any  records  in  these  files  to  the  HSP 
(Subroutine  IESPRT).  f 

4.  Return  to  the  main  routine. 

d.  Outputs. 

(See  Subroutines  SFSUM  (2.4.6. 1),  MPDIAG  (2.4.4.53),  and  HPMODE  (2.4.4.4.7)  for  the  format  of 

the  various  HSP  outputs  generated.) 

1.  Files. 

IESSTATFILE.  If  the  statistics  summary  print  is  displayed,  the  updated  display  time  variable 
(LTMDIS)  is  written  out  to  each  section  of  the  file  displayed. 

e.  Associated  subroutines. 

1.  Subroutine  SFSUM.  Generate  and  output  a  summary  of  the  records  from  file  IESSTATFILE  (see 
2.4.6. 1). 

2.  Subroutine  IESPRT.  Transfer  ASCII-format  print  records  from  a  diagnostic  output  file  to  HSP 
(see  2.4.6.2). 

3.  Subroutine  FILERR.  File  error  diagnostic  control  routine  (see  2.4.8.5). 

4.  Subroutine  PRNTON.  Disable  the  PRINTAWAY  processor  and  set  the  console  error  message 
flag  (see  2.4.8.11). 

f.  Interfaces. 

1.  Called  from  the  main  routine. 

2.  Uses  COMMON  blocks  IONUM,  LUDIAG,  and  PROCON. 
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2.4.6. 1  Subroutine  SFSUM. 


a.  Function. 


Generate  and  output  an  HSP  display  of  the  contents  of  an  IESSTATFILE  summary  record. 


b.  Inputs. 


1.  Argument  list. 


HEADER 

MISSID 

IFLT 

ISUM 

RSUM 

NPRT 


Entry  for  output  header  (CHARACTER) 

Satellite  mission  ID 
Satellite  flight  ID 

Summary  statistics  array  (INTEGER) 

Summary  statistics  array  (REAL,  Equivalenced  to  ISUM) 
Number  of  readout  summaries  to  print 


c.  Processing. 

1.  Print  out  the  header  and  information  in  the  first  output  block. 

2.  Print  out  the  information  in  the  second  block. 

3.  Print  out  the  information  in  the  third  block. 


4.  Return  to  the  calling  routine. 


d.  Outputs. 

Figure  18  and  Table  2  show  an  example  of  the  HSP  display  generated  for  a  single  summary  record, 
and  Figure  19  shows  an  example  of  the  output  generated  for  a  full  file  display. 

e.  Associated  subroutines. 


None. 


f.  Interfaces. 

1.  Called  from  Subroutines  SUMOUT  and  LDSTF. 

2.  Uses  no  COMMON  blocks. 


2.4.6.2  Subroutine  IESPRT. 
a.  Function. 

Read  diagnostic  output  from  an  ASCII  format  file  and  transfer  the  records  to  the  standard  HSP 
file. 
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SSIES  READOUT  PROCESSING  SUMMARY:  SATELLITE  F11  (MISSION  ID:  WX2546) 


SSIES  PERIODIC  PROCESSING  SUMMARY:  SATELLITE  F11  (MISSION  ID:  WX2546) 
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Table  2  Summary  print  output  description 


(Labels  cross-reference  to  Figure  18) 


Label 

a 

b 

c 

d 


e 

f 

g 


h 

j 

k 

I 

m 

n 


o 

P 

q 

r 

s 

t 


u 

V 

w 

X 


y 

z 

aa 

bb 

cc-hh 


ii 

jj 

kk 

11 

mm 

nn 

oo 

PP 


Description 
Readout  REV  number 

Readout  REV  start  date  (DD)  and  time  (HHMM)  (GMT) 

Average  electron  density  from  EP  data  analyses 
Source  of  EP  sweep  analyses 
1:  SS1ES  program 
2:  On-board  microprocessor 

EP  sensor  operating  mode  (0-6  corresponds  to  modes  AB,BS,C,D,DS,E) 
Average  total  ion  density  from  RPA  data  analyses 
Source  of  RPA  sweep  analyses 
1:  SSIES  program 
2:  On-board  microprocessor 
Average  ion  density  from  DM  LLA/LLB  data 
Average  ion  density  from  SM  data 
Average  electron  temperature  from  EP  sweep  analyses 
Average  ion  temperature  from  RPA  sweep  analyses 
Average  power  spectral  density  from  first  SM  filter 
Average  CkL 

Source  of  data  used  in  CkL  calculation 
1:  SM  density  data  only 
2:  SM  density  and  filter  data 
3:  EP  density  data  only 

Average  horizontal  cross-track  ion  drift  velocity  (DM) 

Average  vertical  cross-track  ion  drift  velocity  (DM) 

Average  ram  ion  drift  velocity  (RPA) 

Average  VIP 
Average  Vbias 
Source  of  Vbia5 

1:  Set  from  MP  analyses  of  EP  sweep  data 
2:  Set  from  SENPOT  sensor 
Average  spacecraft  potential  from  EP  sweep  analyses 
Average  electrometer  instrument  temperature 
Average  A/D  converter  instrument  temperature 
Average  DSM  instrument  temperature 
Average  DM  offset  voltage 

Number  of  successful  RPA  sweep  analyses  and  number  attempted 
Number  of  successful  EP  sweep  analyses  and  number  attempted 
Number  of  successful  CkL  calculations  and  number  attempted 
Error/waming  flags  from  processor  modules 
RPA  -  none  currently 

EP  -  none  currently 

SM 
DM 

MP  -  none  currently 

CKL 

Number  of  duplicate  data  frames  encountered 
Average  difference  between  SM  and  DM  ion  densities 
Average  difference  between  SM  ion  and  EP  electron  densities 
Average  difference  between  SM  and  RPA  ion  densities 
Average  difference  between  DM  ion  and  EP  electron  densities 
Average  difference  between  DM  and  RPA  ion  densities 
Average  difference  between  EP  electron  and  RPA  ion  densities 
Number  of  cases  when  Tc  <  T; 
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b. 


Inputs. 


1.  Argument  list. 

LU  -  Logical  unit  of  diagnostic  output  file  to  read 

NAME  -  Name  of  diagnostic  output  file  (CHARACTER) 

2.  Files. 

ASCII  format  records  (132  characters  per  line  maximum)  are  input  from  the  diagnostic  output 
file  designated. 

c.  Processing. 

1.  Rewind  the  specified  diagnostic  output  file. 

2.  If  the  first  attempt  to  read  from  the  file  fails,  write  out  a  diagnostic  statement  and  return  to 
Subroutine  SUMOUT. 

3.  Loop  through  the  file,  reading  in  an  output  line  and  printing  it  until  all  records  in  the  diagnostic 
output  file  have  been  transferred. 

4.  Return  to  Subroutine  SUMOUT. 

d.  Outputs. 

The  HSP  output  generated  by  this  routine  is  in  the  same  format  as  the  data  stored  in  the 
diagnostic  output  file  read. 

e.  Associated  subroutines. 

None. 

f.  Interfaces. 

1.  Called  from  Subroutine  SUMOUT. 

2.  Uses  no  COMMON  blocks. 


2.4.7  Subroutine  QUIT, 
a.  Function. 

Specify  which  of  the  AGDB  transfer  files  (always  1,  see  Subroutine  OPNXFR  2.4.2.7  for 
comments)  is  to  be  transferred  in  the  runstream,  disable  the  PRINTAWAY  processor  in  the 
APGA  program  runstream  if  required,  send  any  necessary  messages  to  the  system  operator’s 
console,  and  close  all  files  used  by  the  APGA  program. 
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b.  Inputs. 


1.  COMMON  blocks. 


/IONUM/ 

LUEDR  - 
LUXFR  - 
LUSTAT  - 

/LUDIAG/ 

LUSMA  - 
LUSMB  - 
LUMPEP  - 
LUMPRP  - 
LUEPA  - 
LUEPB 
LURPAA  - 
LURPAB  - 
LUDMA  - 
LUDMB  - 
LUDMHP  - 
LUFIBA  - 
LUCKLA  - 
LUCKLB  - 
LUQCA  - 
LUEDRA  - 
LUXFRA  - 

/PROCON/ 

IAGDBP  - 
ICNERR  - 
ICNWRT  - 


ICSDGP  - 
IDMDGP  - 
IEDDGP  - 
IEPDGP  - 
IMPOGP  - 
IPAWAY  - 


IQCDGP  - 
IRPDGP  - 
ISMDGP  - 
NFXFR 


Logical  unit  for  file  IESEDRFILE 
Logical  unit  for  file  IESAGDBXFRn 
Logical  unit  for  file  IESSTATFILE 


Logical  unit  for  SMPRC  ASCII  diagnostic  output 
Logical  unit  for  SMPRC  binary  diagnostic  output 
Logical  unit  for  file  IESMPEPPRT 
Logical  unit  for  file  IESMPRPAPRT 
Logical  unit  for  EPPRC  ASCII  diagnostic  output 
Logical  unit  for  EPPRC  binary  diagnostic  output 
Logical  unit  for  RPAPRC  ASCII  diagnostic  output 
Logical  unit  for  RPAPRC  binary  diagnostic  output 
Logical  unit  for  DMPRC  ASCII  diagnostic  output 
Logical  unit  for  DMPRC  binary  diagnostic  output 
Logical  unit  for  DM  H+  mode  diagnostic  output 
Logical  unit  for  DM  FIBA  mode  diagnostic  output 
Logical  unit  for  CKLPRC  ASCII  diagnostic  output 
Logical  unit  for  CKLPRC  binary  diagnostic  output 
Logical  unit  for  QCPRC  ASCII  diagnostic  output 
Logical  unit  for  WRTEDR  ASCII  diagnostic  output 
Logical  unit  for  WRTXFR  ASCII  diagnostic  output 


Transfer  file  diagnostic  output  flag 
Console  message  flag  (see  Figure  20) 
Console  message  write  disable  switch 

=  1:  Do  not  send  console  messages 

*  1:  Send  console  messages 
CKLPRC  module  diagnostic  print  flag 
DMPRC  module  diagnostic  print  flag 
EDR  diagnostic  print  flag 

EPPRC  module  diagnostic  print  flag 
MPPRC  module  diagnostic  print  flag 
PRINTAWAY  disable  flag 

=  0:  Do  not  disable  PRINTAWAY 

*  0:  Disable  PRINTAWAY 
QCPRC  module  diagnostic  print  flag 
RPAPRC  module  diagnostic  print  flag 
SMPRC  module  diagnostic  print  flag 
Transfer  file  number  (always  1) 


» 


4 
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c.  Processing. 

1.  Set  the  condition  word  (obsolete  for  SFC)  and  designate  transfer  file  1  for  printing. 

2.  If  the  console  message  flag  (ICNERR)  is  non-zero,  and  the  console  message  disable  flag 
(ICNWRT)  is  not  one  (1),  write  the  messages  shown  in  Figure  20,  based  on  the  value  of 
ICNERR,  to  the  output  log. 

3.  Close  all  production  files  used. 

4.  Close  any  diagnostic  output  files  used. 

5.  Return  to  the  main  routine. 

d.  Outputs. 


The  messages  shown  in  Figure  20  are  sent  to  HSP. 


ICNERR  Message  Generated 

1  **  ERROR  WITH  SYSTEM  FILE  ACFPARAMETER 
**  EXAMINE  SSIES  PRINT  FOR  ERROR  ** 

2  **  ERROR  WITH  SYSTEM  FILE  IESPREPFILE 
**  EXAMINE  SSIES  PRINT  FOR  ERROR  ** 

3  **  ERROR  WITH  SYSTEM  FILE  IESEDRFILE 
**  EXAMINE  SSIES  PRINT  FOR  ERROR  ** 

4  **  ERROR  WITH  SYSTEM  FILE  IESCNTRLFILE 
**  EXAMINE  SSIES  PRINT  FOR  ERROR  ** 

5  **  ERROR  WITH  SYSTEM  FILE  IESAPEXTABLE 
**  EXAMINE  SSIES  PRINT  FOR  ERROR  ** 

6  **  ERROR  WITH  SYSTEM  FILE  IESAGDBXFR1 
**  EXAMINE  SSIES  PRINT  FOR  ERROR  ** 

or 

**  ERROR  WITH  SYSTEM  FILE  IESAGDBXFR2 
**  EXAMINE  SSIES  PRINT  FOR  ERROR  ** 

7  **  ERROR  WITH  SYSTEM  FILE  IESSTATFILE 
**  EXAMINE  SSIES  PRINT  FOR  ERROR  ** 

8  **  ERROR  ENCOUNTERED  IN  SSIES  PROCESSOR  ** 

9  **  EXAMINE  SSIES  PRINT  FOR  WARNING  ** 


Figure  20  Console  error  messages  generated  from  Subroutine  QUIT 
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e.  Associated  subroutines. 


None, 
f.  Interfaces. 

1.  Called  from  the  main  routine. 

2.  Uses  COMMON  blocks  IONUM,  LUDIAG,  and  PROCON. 

2.4.8  General  Purpose  Library  Routines. 

2.4.8.1  Subroutine  ADATE. 

a.  Function. 

Retrieve  the  current  system  data  and  time. 

b.  Inputs. 

None. 

c.  Processing. 

1.  Call  the  VAX/VMS  intrinsic  routine  IDATE  to  get  the  current  month,  day  and  year. 

2.  Convert  month,  day,  and  year  to  packed  CHARACTER  representation  (MMDDYY). 

3.  Call  the  VAX/VMS  intrinsic  routine  TIME  to  get  the  current  time. 

4.  Reformat  the  returned  CHARACTER  representation  of  current  time  to  eliminate  the  colons  (:) 
in  the  format. 

d.  Outputs. 

1.  Argument  list. 

MMDDYY  -  Packed  CHARACTER  representation  of  Month  (MM),  Day  (DD)  and 

Year  (YY) 

HHMMSS  -  Packed  CHARACTER  representation  of  Hours  (HH),  Minutes  (MM), 

and  Seconds  (SS) 

e.  Associated  subroutines. 

None. 

f.  Interfaces. 

1.  Called  from  several  routines. 

2.  Uses  no  COMMON  blocks. 
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2.4.8.2  Function  BITON. 


a.  Function. 

Determine  if  a  designated  bit  in  the  lowest  order  9  bits  is  set  in  an  input  integer  word. 

b.  Inputs. 

1.  Argument  list. 

IWORD  -  Word  to  check 

IBIT  -  Bit  number  to  check  (1-9) 

c.  Processing. 

1.  See  if  the  bit  corresponding  to  2**(IBIT-1)  is  set.  If  so,  set  BITON  to  .TRUE.;  otherwise,  set  it 
to  .FALSE..  (Note:  The  array  TWON  contains  the  values  of  2**(IBIT-1)  from  IBIT=1  to 
IBIT=9.)  (Note:  The  Boolean  AND  function  was  not  used,  as  it  is  considered  an  extension  to  the 
ANSI  Fortran-77  standard.) 

2.  Return  to  the  calling  routine. 

d.  Outputs. 

1.  Functional  value. 

BITON  =  .TRUE.  -  If  bit  IBIT  in  word  IWORD  is  set. 

=  .FALSE.  -  If  the  bit  is  not  set. 


e.  Associated  subroutines. 

None. 

f.  Interfaces. 

1.  Called  from  many  routines. 

2.  Uses  no  COMMON  blocks. 


2.4.8.3  Subroutine  COPY. 

a.  Function. 

Copy  information  from  source  to  destination. 

b.  Inputs. 

1.  Argument  list. 

SOURCE  -  Scalar  or  array  containing  the  information  to  be  copied 
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INCSRC  -  Increment  used  to  step  through  the  source  array 

When  INCSRC  =  0,  perform  a  scalar  copy.  When  INCSRC  >  0, 
beginning  with  the  first  value,  copy  every  INCSRCth  value  into 
the  DEST  array. 

INCDEST  -  Stepping  increment  for  the  DEST  array  as  information  is  copied 
NUMVALS  -  Number  of  values  to  copy  from  SOURCE  to  DEST 

c.  Processing. 

1.  When  the  source  increment  (INCSRC)  is  zero,  propagate  the  scalar  SOURCE  into  NUMVALS  of 
the  DEST  array. 

2.  When  the  source  increment  (INCSRC)  is  non-zero,  copy  NUMVALS  of  the  SOURCE  array, 
beginning  with  the  first  value  and  incrementing  by  INCSRC,  into  the  DEST  array,  at  increments 
of  INCDEST. 

d.  Outputs. 

1.  Argument  list. 

DEST  -  The  destination  array  for  copied  information. 

e.  Associated  subroutines. 

None. 

f.  Interfaces. 

1.  Called  by  many  routines. 

2.  Uses  no  COMMON  blocks. 


2.4.8.4  Function  ERF. 

a.  Function. 

Calculate  the  value  of  the  error  function  for  the  input  argument.  The  algorithm  used  is  from  the 
National  Bureau  of  Standards  Handbook  of  Mathematical  Functions,  page  297,  series  expansion  # 
7.1.6. 

b.  Inputs. 

1.  Argument  list. 

X  -  Argument  for  the  error  function. 

c.  Processing. 

1.  If  the  argument  is  within  0.001  of  zero,  set  ERF  to  the  value  of  the  input  argument. 
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2. 


If  the  argument  is  outside  the  range  [-4  s  X  s  +4]: 

set  ERF  to  -1.0  when  X  <  -4, 
set  ERF  to  +1.0  when  X  >  +4. 

3.  Otherwise,  calculate  it  from  the  series  expansion  referenced  above. 

4.  Return  to  the  calling  routine. 

d.  Outputs. 

1.  Function  value. 

ERF  -  Value  of  the  error  function  for  X 

e.  Associated  subroutines. 

None. 

f.  Interfaces. 

1.  Called  by  several  routines. 

2.  Uses  no  COMMON  blocks. 


2.4.8.5  Subroutine  FILERR. 


a.  Function. 


Fortran  I/O  error  contingency  routine, 
b.  Inputs. 

1.  Argument  list. 


FNAME 

IOTYPE 

IOERR 

NREC 

NFILE 


RNAME 


Name  of  file  (CHARACTER) 

Type  of  I/O  attempted 

1:  OPEN,  2:  READ,  3:  WRITE 
Error  status  returned  from  I/O  attempt 
Record  number  (direct  access  READ/WRITE  only) 

Internal  file  number  (1-7,  for  ICNERR  and  QUIT) 

1:  ACFPARAMETER 
2:  IESPREPFILE 
3:  IESEDRFILE 
4:  IESCNTRLFILE 
5:  IESAPEXTABLE 
6:  IESAGDBXFRn 
7:  IESSTATFILE 

NOTE:  These  file  numbers  do  not  correlate  with  the  logical  unit  numbers 
assigned  in  Common  IONUM! 

Name  of  subroutine  calling  FILERR  (CHARACTER) 
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c.  Processing. 

1.  Set  the  PRINTAWAY  disable  flag  (IPAWAY)  to  one  (1). 

2.  Unpack  the  I/O  error  status  word  (Sperry  Fortran  packs  the  status  in  the  lower  half  of  the  36-bit 
word). 

NOTE:  This  should  be  modified  to  reflect  the  VAX  error  reporting  conventions. 

3.  If  the  attempt  was  to  OPEN  a  file,  write  out  the  message: 

♦ERROR(rname) *  COULD  NOT  OPEN  FILE  fname 
STATUS:  ioerr 

“♦REFER  TO  OPERATOR  REFERENCE  GUIDE  FOR  REQUIRED  ACTIONS** 
where: 

rname  is  the  name  of  the  routine  in  which  the  error  occurred, 
fname  is  the  name  of  the  file  to  be  OPENed, 
ioerr  is  the  lower  half  of  the  error  status. 

Set  ICNERR  to  the  internal  file  number,  and  return  to  the  calling  routine. 

4.  If  the  attempt  was  to  WRITE  to  a  file,  write  out  the  message: 

*ERROR(rname)*  COULD  NOT  WRITE  TO  FILE  fname 
STATUS:  ioerr  RECORD:  nrec 

***REFER  TO  OPERATOR  REFERENCE  GUIDE  FOR  REQUIRED  ACTIONS** 
where: 

rname  is  the  name  of  the  routine  in  which  the  error  occurred, 

fname  is  the  name  of  the  file  to  be  written  to, 

ioerr  is  the  lower  half  of  the  error  status, 

nrec  is  the  I/O  record  to  which  the  write  was  directed. 

(Note:  If  this  was  not  a  direct  access  write,  the  RECORD  item  is  omitted.) 

Set  ICNERR  to  the  internal  file  number,  and  return  to  the  calling  routine. 

5.  If  the  attempt  was  to  READ  from  a  file,  write  out  the  message: 

♦ERROR(rname) *  COULD  NOT  READ  FROM  FILE  fname 
STATUS:  ioerr  RECORD:  nrec 

***REFER  TO  OPERATOR  REFERENCE  GUIDE  FOR  REQUIRED  ACTIONS** 
where: 

rname  is  the  name  of  the  routine  in  which  the  error  occurred, 

fname  is  the  name  of  the  file  to  be  read  from, 

ioerr  is  the  lower  half  of  the  error  status, 

nrec  is  the  I/O  record  from  which  the  read  was  directed. 

(Note:  If  this  was  not  a  direct  access  read,  the  RECORD  item  is  omitted.) 
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Set  ICNERR  to  the  internal  file  number,  and  return  to  the  calling  routine. 

d.  Outputs. 

The  above  messages  are  written  to  HSP. 

1.  COMMON  blocks. 

/PROCON/ 

IPAWAY  -  PRINTAWAY  disable  flag 

ICNERR  -  Console  error  flag 

e.  Associated  subroutines. 

None. 

f.  Interfaces. 

1.  Called  from  several  routines. 

2.  Uses  COMMON  block  PROCON. 

2.4.8.6  Subroutine  FITLIN. 

a.  Function. 

Perform  a  linear  least-squares  fit  to  an  input  set  of  x  and  y  values. 

b.  Inputs. 

1.  Argument  list. 

X  -  x  values 

Y  y  values 

N  -  number  of  x-y  pairs 

c.  Processing. 

1.  Calculate  the  elements  of  the  least-squares  matrix  (the  sums  of  x,  y,  x2 ,  and  xy). 

2.  Calculate  the  determinant  of  the  matrix  from: 

C  =  N  £x2  -  Q»2 

3.  If  the  determinant  is  zero,  set  the  linear  fit  coefficients  to  zero. 
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4.  If  not,  calculate  the  fit  coefficients  from: 


A  =  (N  £xy  -  £x£y)/c 
B  =  (£x2  -  I>Ixy)/C 
5.  Return  to  the  calling  routine. 

d.  Outputs. 

1.  Argument  list. 

A  -  Slope  of  linear  fit 

B  -  Zero-intercept  of  linear  fit 

e.  Associated  subroutines. 

None. 

f.  Interfaces. 

1.  Called  from  several  routines  (RPAPRC  module). 

2.  Uses  no  COMMON  blocks. 

2.4.8.7  Subroutine  LATLON. 

a.  Function. 

Calculate  the  geographic  latitude  and  longitude  of  a  satellite  in  a  circular  orbit  for  the  input  time. 

b.  Inputs. 

1.  Argument  list. 

IDT  -  Time  since  the  time  in  ITCKL(l) 

2.  COMMON  blocks. 

/SATEPH/ 

PHIO  -  Angle  in  orbit  at  time  ITCKL(l)  (rad) 

OMEGA  -  Satellite  angular  velocity  (rad/sec) 

ORBINC  -  Orbital  inclination  (rad) 

ANLON  -  Longitude  of  last  ascending  node  (rad) 

c.  Processing. 

1.  Calculate  the  angle  in  the  orbit  from  the  last  ascending  node  for  time  IDT  after  ITCKL(l) 
(DPHI),  and  the  total  time  since  the  last  ascending  node  (DT). 
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2.  Calculate  the  latitude  of  the  satellite  from: 

A.  =  sin'1  [sin  i  sinA<|>] 

where:  A.  is  the  latitude, 

i  is  the  orbital  inclination  (ORBINC), 

A<}>  is  the  angle  in  the  orbit  from  ANLON. 

3.  Calculate  the  longitude  of  the  satellite  from: 

e  =  tan-1  cos  1  ♦  e, 

COS  A<p 

where:  8  is  the  longitude, 

Qe  is  the  angular  rotational  velocity  of  the  earth. 

4.  Return  to  the  calling  routine. 

d.  Outputs. 

1.  Argument  list. 

SLAT  -  Satellite  latitude  (deg) 

SLON  -  Satellite  longitude  (deg) 

e.  Associated  subroutines. 

None. 

f.  Interfaces. 

1.  Called  from  routines  EPHEM  and  MPDIAG. 

2.  Uses  COMMON  blocks  PIDEG  and  SATEPH. 

2.4.8.8  Subroutine  LOGLIN. 

a.  Function. 

Convert  a  list  of  numbers  to/from  base-10  logarithms. 

b.  Inputs. 

1.  Argument  list. 


XIN 

N 


List  of  number  to  convert 
Number  of  values  in  XIN 


ITYPE 


Direction  of  conversion 
1:  from  log 
2:  to  log 

c.  Processing. 

1.  If  ITYPE  is  1,  convert  the  values  in  XIN  from  logs,  setting  all  output  values  to  zero  for  XIN  ;>  0. 

2.  If  ITYPE  is  2,  convert  the  values  in  XIN  to  logs,  setting  all  output  values  to  zero  for  XIN  <;  0. 

3.  Return  to  the  calling  routine. 

d.  Outputs. 

1.  Argument  list. 

XOUT  -  Array  of  XIN  converted  values 

e.  Associated  subroutines. 

None. 

f.  Interfaces. 

1.  Called  from  several  routines. 

2.  Uses  no  COMMON  blocks. 


2.4.8.9  Subroutine  OPNDOF 


a.  Function. 


Open  diagnostic  output  files. 


b.  Inputs. 

1.  Argument  list. 
IDIAG 


LUASC 

FNASC 

LUBIN 

FNBIN 

NRSIZE 


Diagnostic  print  flag 

0:  Write  ASCII  output  to  HSP  file  (unit  6) 
1:  Open  binary  output  file 
2:  Open  ASCII  output  file 
3:  Open  both  binary  and  ASCII  output  files 
Logical  unit  for  ASCII  output  file 
Name  of  ASCII  output  file  (CHARACTER) 

Logical  unit  for  binary  output  file 

Name  of  binary  output  file  (CHARACTER) 

Size  of  binary  file  output  records  (words) 
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c.  Processing. 


1.  If  the  diagnostic  print  flag  is  negative,  set  it  positive  and  set  the  ASCII  output  file  unit  to  6. 

2.  Determine  which  files  to  open  based  on  the  bits  set  in  the  diagnostic  print  flag. 

3.  Open  the  binary  output  file  if  requested.  If  an  error  is  encountered,  alert  the  user,  and  turn  off 
the  binary  diagnostic  output. 

4.  Open  the  ASCII  output  file  if  requested.  If  an  error  is  encountered,  alert  the  user,  and  turn  off 
the  ASCII  diagnostic  print. 

5.  Return  to  the  calling  routine. 

d.  Outputs. 

1.  Argument  list. 

ASCII  -  .TRUE,  if  ASCII  output  file  OPENed 

BINARY  -  .TRUE,  if  binary  output  file  OPENed 

e.  Associated  subroutines. 

1.  Function  BITON.  Determine  if  a  bit  is  set  in  an  integer  word  (see  2.4.8.2). 

2.  Subroutine  FILERR.  File  error  diagnostic  control  routines  (see  2.4.8.5). 

f.  Interfaces. 

1.  Called  from  several  routines. 

2.  Uses  no  COMMON  blocks. 

2.4.8.10  Function  PRMRNG. 

a.  Function. 

Check  an  environment  parameter  to  see  if  it  is  within  allowed  range  (ranges  set  in  the  BLOCK 
DATA  routine,  see  2.4. 1.2). 

b.  Inputs. 

1.  Argument  list. 

PRM  -  Parameter  to  check 

NPRM  -  Parameter  number 

1:  Plasma  density 
2:  Electron  temperature 
3:  Ion  temperature 
4:  Horizontal  ion  drift  velocity 
5:  Vertical  ion  drift  velocity 
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6:  Pi 

7:  T, 

8:  CkL 

9:  Satellite  potential 


2.  COMMON  blocks. 


/EDRNGS/ 

PARMAX  - 
PARMIN  - 
IPRM 


Maximum  allowed  values 
Minimum  allowed  values 
Missing-data  replacement  flag: 

=  0:  replace  out-of-range  values  by  -1.0E37 

=  1:  replace  out-of-range  values  by  nearest  allowed  extrema 

>1:  do  not  replace  out-of-range  values 


c.  Processing. 

1.  If  the  parameter  is  within  range,  set  the  function  value  to  .TRUE.. 

2.  If  not,  set  the  function  value  to  .FALSE,  and  set  the  parameter  value  to  -1.0E37  if  the 
replacement  flag  is  zero,  or  to  the  maximum  or  minimum  value  if  the  flag  is  one. 

3.  Return  to  the  calling  routine. 

d.  Outputs. 

1.  Function  value. 

PRMRNG  -  .TRUE,  if  the  parameter  is  in  range 

.FALSE,  if  the  parameter  is  out  of  range 

2.  Argument  list. 

PRM  -  Set  to  -1.0E37  if  out-of-range  and  the  flag  is  0 

Set  to  max  or  min  value  if  out  of  range  and  the  flag  is  1 


e.  Associated  subroutines. 

None. 

f.  Interfaces. 

1.  Called  from  several  routines. 

2.  Uses  COMMON  block  EDRNGS. 
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2.4.8.11  Subroutine  PRNTON. 


a.  Function. 

Disable  the  PR1NTAWAY  flag  and  set  variable  ICNERR  for  use  in  Subroutine  QUIT  to  generate 
error  messages. 

b.  Inputs. 

1.  Argument  list. 

ICON  -  Value  assigned  to  ICNERR 

2.  COMMON  blocks. 

/PROCON/ 

ICNERR  -  Console  error  message  flag 

c.  Processing. 

1.  Set  variable  IPAWAY  to  one  (1)  to  have  Subroutine  QUIT  disable  the  PRINTAWAY  processor. 

2.  If  this  is  the  first  call  to  this  routine,  set  ICNERR  to  ICON. 

3.  If  not,  set  ICNERR  to  ICON  only  if  ICON  is  less  than  ICNERR  (indicating  a  possibly  worse 
problem). 

4.  Return  to  the  calling  routine. 

d.  Outputs. 

1.  COMMON  blocks. 

/PROCON/ 

IPAWAY  -  PRINTAWAY  disable  flag 

ICNERR  -  Console  error  message  flag 

e.  Associated  subroutines. 

None. 

f.  Interfaces. 

1.  Called  from  several  subroutines. 

2.  Uses  COMMON  block  PROCON. 
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2.4.8.12  Subroutine  TIMCON. 


a.  Function. 

Convert  between  date/time  (GMT)  and  IES  minutes,  defined  as  the  number  of  minutes  since 
OOOOGMT  on  1  January  1985.  This  time  measure  is  used  by  the  APGA  program  for  file  control. 
Leap  years,  end-of-years,  end-of-days,  etc.,  are  all  handled  by  using  IES  minutes  (similar  in  concept 
to  Julian  hours  used  by  the  AFGWC  database  system).  Note  that  the  choice  of  1  January  1985 
was  totally  arbitrary.  This  routine  is  good  until  the  time  standards  are  reset  to  pick  up  missing 
minutes. 

b.  Inputs. 

1.  Argument  list. 


IDIR 

Conversion  direction 

1:  to  IES  minutes 

2:  from  IES  minutes 

IDATE 

Date  (YYMMDD)  (input  if  IDIR  =  1) 

ITIME 

Time  (HHMM)  (input  if  IDIR  =  1) 

IESMIN  - 

IES  minute  (input  if  IDIR  =  2) 

c.  Processing. 

1.  If  converting  from  date/time  to  IES  minutes,  then: 

(a)  Determine  the  number  of  days  since  1  January  1985 

(b)  Convert  the  days  to  minutes, 

(c)  Add  on  the  number  of  minutes  in  the  current  day. 

2.  If  converting  from  IES  minutes  to  date/time,  then: 

(a)  Determine  the  time  in  the  current  day, 

(b)  Determine  the  year, 

(c)  Determine  the  month  and  day, 

(d)  Calculate  the  date  (YYMMDD). 

3.  Return  to  the  calling  routine. 

d.  Outputs. 

1.  Argument  list. 

IDATE  -  Date  (YYMMDD)  (output  if  IDIR  =  2) 

ITIME  -  Time  (HHMM)  (output  if  IDIR  =  2) 

IESMIN  -  IES  minute  (output  if  IDIR  =  1) 

e.  Associated  subroutines. 

None. 
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f.  Interfaces. 


1.  Called  from  several  routines. 

2.  Uses  no  COMMON  blocks. 

2.4.8.13  Subroutine  UPBITS. 

a.  Function. 

Unpack  the  lower  order  bits  from  a  word  and  load  them  into  an  array  consisting  of  1  bit  per  word. 

b.  Inputs. 

1.  Argument  list. 

IWORD  -  Word  to  unpack 

NBITS  -  Number  of  bits  to  unpack 

c.  Processing. 

1.  Extract  the  lowest  bit  from  the  word  and  load  it  into  the  array. 

2.  Divide  the  word  by  two  to  drop  off  the  lowest  bit. 

3.  Repeat  steps  1  and  2  until  all  bits  have  been  extracted. 

4.  Return  to  the  calling  routine. 

d.  Outputs. 

1.  Argument  list. 

IARRAY  -  Array  of  unpacked  bits 

e.  Associated  subroutines. 

None. 

f.  Interfaces. 

1.  Called  from  Subroutines  MPEP  and  MPRPA. 

2.  Uses  no  COMMON  blocks. 

2.5  Program  LDCON02. 
a.  Function. 

Load  the  IESCNTRLFILE  with  the  instrument  and  control  parameters  required  to  properly  run 
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the  APGA  program.  This  program  was  developed  for  SSIES2  based  upon  a  functional  emulation 
of  the  LDCON  program  formerly  used  at  AFGWC. 

The  program  accommodates  the  entry  of  a  full  set  of  values  for  up  to  3  different  satellites.  The 
structure  of  the  control  file  and  therefore  the  data  dimensions  and  ordering  in  LDCON02  are 
closely  allied  to  the  size  and  structure  of  the  APGA  COMMON  blocks  SCNMOD,  SATPAR, 
PROCON,  SMCON,  EPCON,  RPACON,  DMCON,  CKLCON,  MPCON,  and  DFCON.  Any 
change  to  one  of  these  COMMON  blocks  in  APGA  must  be  matched  with  an  equivalent  change 
in  LDCON02  to  keep  the  data  in  proper  alignment.  (See  2.4.2.4,  Subroutine  VEHPAR). 

b.  Inputs. 

1.  Argument  list. 

None. 

2.  COMMON  blocks. 

None. 

3.  Files. 

IESCONLIST.ASCII  -  An  optional  input  file  containing  the  values  to  be  written  to  the  binaty 
output  file. 

See  8.4  of  Volume  2,  Programmer’s  Guide,  for  a  complete  list  of  the  LDCON02  parameter 
names,  their  APGA  equivalent  parameter  names,  and  their  default  values  for  the  IES2  Fll 
satellite. 

c.  Processing. 

1.  Inquire  about  the  existence  of  the  optional  ASCII  input  file. 

2.  Open  the  binary  output  file. 

3.  If  the  optional  ASCII  input  file  does  not  exist,  begin  an  interactive  dialogue  with  the  user  to 
acquire  the  values  for  the  control  file.  When  the  user  enters  the  slash  character  (/)  or 
<CYRLrZ>,  the  default  value  assigned  in  the  internal  data  statement  will  be  used  for  the 
specified  variable. 

4.  If  the  optional  ASCII  file  does  exist,  open  the  file  and  read  the  control  file  values  from  the  file. 

5.  Write  the  input  values  to  the  binary  output  file  for  use  by  the  APGA  program. 

6.  If  the  optional  ASCII  input  file  did  not  exist,  create  one  and  write  the  user  supplied  values  to  the 
ASCII  file. 

d.  Outputs. 

1.  Argument  list. 

None. 
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2.  COMMON  blocks. 


None. 

3.  Files. 

IESCTL.DAT  -  A  single  record  binary  file  containing  the  processing  control  information  and 
instrument  processing  constants  in  the  format  required  by  the  APGA  program. 

IESCONLIST.ASCII  -  A  formatted  text  file  containing  the  values  written  to  IESCTL.DAT. 

e.  Associated  subroutines. 

1.  Subroutine  IGET.  Interact  with  the  user  terminal  to  prompt  for  and  read  an  Integer  input 
value. 

2.  Subroutine  RGET.  Interact  with  the  user  terminal  to  prompt  for  and  read  a  Real  input  value. 

f.  Interfaces. 

1.  Program  initiated  by  user. 

2.  Uses  no  COMMON  blocks. 

2.6  Program  BNBA  Description. 

2.6.1  Main  Routine. 

a.  Function. 

Control  the  unpacking,  reordering,  and  reformatting  of  raw  IES,  IES2,  IES2A,  and  IES3  data 
streams  to  produce  a  Common  Format  Prepfile  for  the  APGA  processing  program. 

b.  Inputs. 

1.  Files: 

TMFILE  -  File  containing  the  raw  packed  IES,  IES2,  IES2A,  or  IES3  telemetry  and 
ephemeris  data. 

c.  Processing. 

1.  Invoke  Subroutine  USERIN  to  obtain  run  control  parameters  from  the  user. 

2.  Initialize  data  storage  arrays. 

3.  Invoke  Subroutine  RIREXT  to  open  the  input  file  and  process  the  header  record. 

4.  Verify  that  the  input  file  data  type  matches  the  requested  data  type. 
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BNBA: 

Main  Program 

.  USERIN: 

Request  run  parameter  inputs 

. .  CHEK  IN: 

Verify  run  parameter  inputs 

.  RIREXT: 

Read,  unpack,  and  reformat  RIR  data 

. .  ERRLOG: 

I/O  Error  reporting 

.  EPHEXT: 

Read  and  unpack  Ephemeris  data 

.  .  ERRLOG: 

I/O  Error  reporting 

.  TMEXT: 

Read  and  unpack  Telemetry  data 

.  .  ERRLOG: 

I/O  Error  reporting 

.  WORKOUT: 

Write  unpacked  Ephemeris/Telemetry  data  to  intermediate  work  file 

. .  ERRLOG: 

I/O  Error  reporting 

.  WORKIN: 

Read  unpacked  Ephemeris/Telemetry  data  in  time  ascending  order 

.  .  ERRLOG: 

I/O  Error  reporting 

.  PRINTIT: 

List  unpacked  data  to  diagnostic  file 

.  GET  XCEPTS: 

Reformat  Telemetry  data 

.  .  IES  XCEPT: 

Process  exceptions  for  IES  data 

.  .  .  VALCHEK: 

Verify  Telemetry  data 

.  .  .  CYCNT1: 

Cycle  1  specific  processing 

....  VALCHEK: 

Verify  Telemetry  data 

....  CYCNT2: 

Cycle  2  specific  processing 

.  .  .  CYCNT2: 

Cycle  2  specific  processing 

....  VALCHEK: 

Verify  Telemetry  data 

....  CYCNT1: 

Cycle  1  specific  processing 

.  .  IES2  XCEPT: 

Process  exceptions  for  IES2  data 

.  .  .  VALCHEK: 

Verify  Telemetry  data 

.  .  .  CYCNT1: 

Cycle  1  specific  processing 

....  VALCHEK: 

Verify  Telemetry  data 

....  CYCNT2: 

Cycle  2  specific  processing 

.  .  .  CYCNT2: 

Cycle  2  specific  processing 

....  VALCHEK: 

Verify  Telemetry  data 

....  CYCNT1: 

Cycle  1  specific  processing 

.  .  IES2A  XCEPT: 

Process  exceptions  for  IES2A  data 

.  .  .  VALCHEK: 

Verify  Telemetry  data 

.  .  .  CYCNT1: 

Cycle  1  specific  processing 

....  VALCHEK: 

Verify  Telemetry  data 

....  CYCNT2: 

Cycle  2  specific  processing 

.  .  .  CYCNT2: 

Cycle  2  specific  processing 

....  VALCHEK: 

Verify  Telemetry  data 

....  CYCNT1: 

Cycle  1  specific  processing 

.  .  IES3  XCEPT: 

Process  exceptions  for  IES3  data 

.  STOREM: 

Store  reformatted  Telemetry  block 

.  OUTPUT: 

Write  reformatted  RIR/Ephemeris/Telemetry  data  blocks 

Figure  21  Program  BNBA  hierarchy  chart 


5.  Establish  the  unpacking  loop  to: 

a.  read  and  unpack  an  Ephemeris  data  record, 

b.  read  and  unpack  a  telemetry  data  record, 
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c.  write  the  unpacked  data  to  an  intermediate  work  file, 

d.  loop  through  step  5  until  all  requested  data  have  been  unpacked. 

6.  If  the  unpacking  was  not  successful,  print  an  informative  message  and  terminate  the  run. 
Otherwise: 

a.  invoke  Subroutine  WORKIN  to  read  the  first  (lowest  time)  unpacked  data  record, 

b.  invoke  Subroutine  GET_XCEPTS  to  process  the  Common  Format  storage  exceptions  for  the 
first  data  record. 

7.  Establish  the  loop  to  successively  read  and  reformat  each  unpacked  data  record  and  write  the 
results  to  the  output  file.  Because  the  data  reformatting  involves  the  transfer  of  data  from  one 
cycle  (record)  to  another,  the  input  data  is  double  buffered. 

d.  Outputs. 

1.  Files. 

IESPREPFIL  -  The  unpacked,  reordered,  and  reformatted  Ephemeris  and  telemetry  data. 
This  file  is  used  as  the  primary  input  file  to  APGA. 

WORKFIL  -  The  keyed,  indexed  intermediate  file  for  temporary  storage  of  unpacked  data. 
This  allows  the  data  records  to  be  read  in  time  ascending  order  for  reformatting. 

e.  Associated  subroutines. 

1.  Subroutine  USERIN.  Acquire  user  specified  processing  control  parameters. 

2.  Subroutine  RIREXT.  Open  the  input  file  and  read  and  unpack  the  header  record. 

3.  Subroutine  EPHEXT.  Read  and  unpack  an  Ephemeris  data  record. 

4.  Subroutine  TMEXT.  Read  and  unpack  a  telemetry  data  record. 

5.  Subroutine  WORKOUT.  Write  an  unpacked  Ephemeris  and  telemetry  records  to  the 
intermediate  file. 

6.  Subroutine  WORKIN.  Read  an  unpacked  Ephemeris  and  telemetry  record  in  time  ascending 
order. 

7.  Subroutine  GET_XCEPTS.  Process  the  Common  Format  storage  exceptions. 

8.  Subroutine  STOREM.  Store  the  telemetry  data  in  the  Common  Format. 

9.  Subroutine  OUTPUT.  Write  a  reformatted  data  record  to  the  output  file. 
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f.  Interfaces. 


1.  Main  routine. 

2.  Uses  COMMON  blocks  OUTREC,  OUTRIR,  and  WORKREC. 


2.6.2  Subroutine  USERIN. 

a.  Function. 

Prompt  the  user  for  necessary  control  parameters,  and  verify  the  validity  of  the  values  entered. 

b.  Inputs. 

All  inputs  are  parameters  supplied  by  the  user. 

c.  Processing. 

1.  Prompt  the  user  to  supply  the  input  file  path  and  name. 

2.  Prompt  the  user  to  supply  the  output  file  path  and  name. 

3.  Prompt  the  user  to  supply  the  work  file  path  and  name. 

4.  Prompt  the  user  to  supply  the  instrument  type,  and  validity  check  the  response  (IES,  IES2,  IES2A, 
IES3). 

5.  Prompt  the  user  to  supply  a  4  digit  mission  ID. 

6.  Prompt  the  user  to  supply  a  start  time  (Year,  Day  of  year,  Hour,  Minute,  Second)  for  the 
processing,  and  validity  check  the  response. 

7.  Prompt  the  user  to  supply  an  end  time  (Year,  Day  of  year,  Hour,  Minute,  Second)  for  the 
processing,  and  validity  check  the  response. 

8.  Query  the  user  regarding  the  generation  of  a  diagnostic  data  listing. 

9.  Echo  the  user  supplied  parameters  and  prompt  the  user  for  a  response  to  proceed  or  modify  the 
parameters. 

10.  Return  to  program  BNBA. 


d.  Outputs. 


1.  Argument  list. 


TMFILENAM  - 
IESPREPFIL  - 
WORKFILNAM  - 
IESTYP  - 


Full  path  name  of  the  input  file 
Full  path  name  of  the  output  file 
Full  path  name  of  the  work  file 
Specified  IES  instrument  indicator  code: 

I  =  IES,  2  =  IES2,  3  =  IES2A,  4  =  IES3 
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MIDREQ  - 
INTIME  - 
NDTIME  - 
PROCEED  - 
LISTDATA  - 


Specified  mission  ID 

Time  to  start  processing  (seconds) 

Time  to  end  processing  (seconds) 

Proceed  with  processing  flag  (LOGICAL) 
Diagnostic  listing  generation  flag  (LOGICAL) 


e.  Associated  subroutines. 


1.  Subroutine  CHEK_IN.  Check  validity  of  user  supplied  times,  and  convert  Hour,  Minute, 
Second  to  total  seconds. 

f.  Interfaces. 

1.  Called  by  the  main  routine. 

2.  Uses  no  COMMON  blocks. 


2.6.3  Subroutine  RIREXT. 

a.  Function. 

Unpack,  convert,  and  store  the  Readout  information  Record  (RIR)  for  use  by  the  APGA 
program. 

b.  Inputs. 

1.  Argument  list. 

INUNIT  -  Input  file  unit  number 

TMFILENAM  -  Input  file  name 

IESREQ  -  Instrument  indicator  code 

2.  COMMON  blocks. 

None. 

3.  Files. 

TMFILE  -  The  raw  data  file  from  which  the  header  (RIR)  record  is  read. 

c.  Processing. 

1.  Open  the  designated  (TMFILENAM)  input  data  file. 

a.  If  the  open  was  not  successful,  set  the  proper  indicators, 

b.  Invoke  ERRLOG  to  write  an  informative  message, 

c.  Return  to  BNBA. 

2.  Read  the  Readout  Information  Record  into  a  VAX  BYTE  array. 
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a.  If  the  read  was  not  successful,  set  the  proper  indicators, 

b.  Invoke  ERRLOG  to  write  an  informative  message, 

c.  Return  to  BNBA 

3.  Align  the  bit  sequence  properly  for  unpacking  (i.e.:  into  the  order  originally  written  on  the  Sperry 
UNIVAC)  by  reversing  the  order  of  the  VAX  longwords  in  the  data  array  which  is 
EQUIVALENCEd  to  the  input  BYTE  array. 

4.  Initialize  the  word  (LWORD)  and  start  bit  within  the  word  (INBIT)  pointers  to  begin  the 
unpacking  process  at  the  end  of  the  bit  stream. 

5.  Establish  a  loop  to  unpack  each  of  the  40  data  quantities  needed,  using  the  VAX  intrinsic 
function  IBITS.  The  size  of  each  quantity  (in  bits)  is  specified  in  the  array  NBITS,  the  number  of 
bits  to  skip  between  quantities  is  specified  in  the  array  NSKIP,  and  the  word  and  start  bit  within 
the  word  pointers  are  decremented  as  needed. 

6.  Store  the  4  characters  of  the  Mission  ID  into  a  VAX  longword  using  the  VAX  intrinsic  function 
MVBITS. 

7.  Concatenate  the  12  characters  of  the  prepfile  name  into  a  VAX  character  array  using  the  VAX 
intrinsic  function  MVBITS. 

8.  Determine  the  sensor  type  (IES,  IES2,  IES2A,  or  IES3)  from  the  prepfile  name,  and  store  the 
proper  code  into  the  output  array. 

9.  Convert  the  Mission  ID  to  an  integer  and  store  it  into  the  output  array. 

10.  Calculate  and  properly  format  the  remaining  data  needed  by  APGA  and  store  it  into  the  output 
array. 


11.  Return  to  BNBA. 


d.  Outputs. 

1.  Argument  list. 

IRCDKEY  - 
IESTYP  - 

MISSID 
IRIRRTN  - 


Index  key  value  from  RIR  record  read 
Instrument  code: 

1  =IES,  2  =  IES2,  3  =  IES2A,  4  =  IES3 
Mission  ID  (integer) 

I/O  status  flag: 

=  0:  No  error 

>  0:  Open  or  Read  error  occurred 


2.  COMMON  blocks. 

/OUTRIR/ 

IRIROUT  -  Array  of  unpacked  and  reformatted  RIR  data 
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e. 


Associated  subroutines. 


1.  Subroutine  ERRLOG.  I/O  error  reporting, 
f.  Interfaces. 

1.  Called  by  the  main  routine. 

2.  Uses  COMMON  block  OUTRIR. 


2.6.4  Subroutine  EPHEXT. 

a.  Function. 

Unpack,  convert,  and  store  the  Ephemeris  data  for  use  by  the  APGA  processing  program. 

b.  Inputs. 

1.  Argument  list. 

INUNIT  - 
IRCDKEY  - 
IESTYP 

2.  COMMON  blocks. 

AVORKREC/ 

ICUR 
IPREV 

3.  Files. 

TMFILE  -  The  raw  data  file  from  which  the  Ephemeris  data  record  is  read. 

c.  Processing. 

1.  Read  the  Ephemeris  data  record  into  a  VAX  BYTE  array. 

a.  If  the  read  was  not  successful  set  the  proper  indicators, 

b.  Invoke  ERRLOG  to  write  an  informative  message, 

c.  Return  to  BNBA. 

2.  Align  the  bit  sequence  properly  for  unpacking  (i.e.:  into  the  order  originally  written  on  the  Sperry 
UNIVAC)  by  reversing  the  order  of  the  VAX  longword  array  which  is  EQUIVALENCEd  to  the 
input  BYTE  array. 

3.  Initialize  the  word  (LWORD)  and  start  bit  within  the  word  (INBIT)  pointers  to  begin  the 


Input  file  unit  number 

Index  key  value  from  last  input  record  read 

Instrument  indicator  code: 

1  =IES,  2  =  IES2,  3  =  IES2A,  4  =  IES3 


Pointer  to  current  data  record 
Pointer  to  previous  data  record 
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unpacking  process  at  the  end  of  the  bit  stream. 

4.  Establish  a  loop  to  unpack  each  of  the  28  data  quantities  needed,  using  the  VAX  intrinsic 
function  IB1TS.  The  size  of  each  quantity  (in  bits)  is  specified  in  the  array  NBITS,  the  number  of 
bits  to  skip  between  quantities  is  specified  in  the  array  NSKIP,  and  the  word  and  start  bit  within 
the  word  pointers  are  decremented  as  needed. 

a.  When  the  quantity  being  unpacked  is  in  a  Sperry  floating  point  (REAL)  form,  the  sign, 
characteristic,  and  mantissa  are  unpacked  as  separate  entities.  The  characteristic  and  mantissa 
are  one’s  complemented  when  the  sign  is  negative,  and  the  characteristic  is  normalized  for  the 
Sperry  exponent  convention  and  the  number  of  bits  in  the  mantissa  (27).  The  VAX 
equivalent  floating  point  value  is  calculated  from  the  components. 

b.  When  the  quantity  being  unpacked  is  INTEGER,  the  least  significant  32  bits  (of  the  Sperry  36 
bit  integer)  are  extracted. 

c.  The  converted  value  is  stored  into  the  current  output  array. 

5.  Return  to  BNBA. 

d.  Outputs. 

1.  Argument  list. 

IRCDKEY  -  Index  key  value  from  Ephemeris  record  read 

IEPHRTN  -  Read  status: 

=  0:  No  error 
>  0:  Read  error  occurred 

2.  Common  blocks. 

/WORKREC/ 

IPHVAL  -  Array  of  unpacked  and  reformatted  Ephemeris  data 

e.  Associated  subroutines. 

1.  Subroutine  ERRLOG.  I/O  error  reporting. 

f.  Interfaces. 

1.  Called  by  the  main  routine. 

2.  Uses  COMMON  block  WORKREC. 


2.6.5  Subroutine  TMEXT. 
a.  Function. 

Unpack,  convert,  and  store  the  60  sets  of  1  second  Telemetry  data  for  use  by  the  APGA 
processing  program. 
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b.  Inputs. 


4 


1.  Argument  list. 


INUNIT 

IRCDKEY 

IESTYP 


2.  COMMON  blocks. 

/WORKREC/ 

ICUR 

IPREV 


Input  file  unit  number 

Index  key  value  from  last  input  record  read 

Instrument  indicator  code: 

1  =IES,  2  =  IES2,  3  =  IES2A,  4  =  IES3 


Pointer  to  current  data  record 
Pointer  to  previous  data  record 


3.  Files. 

TMFILE  -  The  raw  data  file  from  which  the  Telemetry  data  record  is  read. 


c.  Processing. 

1.  Read  the  Telemetry  data  record  into  a  VAX  BYTE  array. 

a.  If  the  read  was  not  successful,  set  the  proper  indicators, 

b.  Invoke  ERRLOG  to  write  an  informative  message, 

c.  Return  to  BNBA. 

2.  Align  the  bit  sequence  properly  for  unpacking  (i.e.:  into  the  order  originally  written  on  the  Sperry 
UNIVAC)  by  reversing  the  order  of  the  VAX  longword  array  which  is  EQUIVALENCEd  to  the 
input  BYTE  array. 

3.  Initialize  the  word  (LWORD)  and  start  bit  within  the  word  (INBIT)  pointers  to  begin  the 
unpacking  process  at  the  end  of  the  bit  stream. 

4.  Establish  a  loop  to  unpack  each  of  the  60  sets  of  Telemetry  data  quantities  needed,  using  the 
VAX  intrinsic  function  IBITS.  The  size  of  each  quantity  (in  bits)  is  specified  by  NBITS,  and  the 
pointers  to  the  word  and  to  the  start  bit  within  the  word  are  decremented  as  needed. 

a.  Establish  a  loop  to  unpack  the  (instrument  dependent)  number  of  sets  of  data  each  second. 
Note  that  a  set  is  defined  as  4,  9  bit  quantities,  which  equals  1  Sperry  36  bit  word. 

b.  The  first  set  of  data  for  each  second  contains  the  coded  time  for  the  record.  These  values  are 
extracted  and  concatenated  into  a  VAX  longword. 

c.  The  remaining  sets  each  contain  4,  9  bit  coded  instrument  data,  or  control  information.  Each 
of  these  9  bit  values  is  extracted,  aligned,  and  stored  into  the  current  output  (VAX  INTEGER 
*  2)  array. 

d.  The  time  value  is  converted  into  seconds  and  stored  into  the  current  time  array. 
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5.  When  the  data  for  all  60  seconds  have  been  processed,  return  to  BNBA. 


d.  Outputs. 

1.  Argument  list.  * 

IRCDKEY  -  Index  key  value  from  Telemetry  record  read 

ITMRTN  -  Read  status: 

=  0:  No  error 
>  0:  Read  error  occurred 

2.  COMMON  blocks. 

AVORKREC/ 

ITMSEC  -  Array  of  1  second  telemetry  times 

ITMUPK  -  Array  of  unpacked  telemetry  data 

e.  Associated  subroutines. 

1.  Subroutine  ERRLOG.  I/O  error  reporting. 

f.  Interfaces. 

1.  Called  by  the  main  routine. 

2.  Uses  COMMON  block  WORKREC. 

2.6.6  Subroutine  WORKOUT. 

a.  Function. 

Write  the  unpacked  Ephemeris  and  Telemetry  data  to  an  intermediate  storage  file. 

b.  Inputs. 

1.  Argument  list. 

WORKFILNAM  -  Full  path  name  for  the  work  file 
IWRKUNIT  -  Unit  number  of  the  work  file 
IESTYP  -  Instrument  indicator  code: 

1  =  IES,  2  =  IES2,  3  =  IES2A,  4  =  IES3 

2.  COMMON  blocks. 

■* 

/WORKREC/ 

ICUR  -  Pointer  to  current  data  buffer 

IPHVAL  -  Unpacked  Ephemeris  data  * 

ITMSEC  -  Telemetry  data  times 

ITMUPK  -  Unpacked  Telemetry  data 
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c.  Processing. 


i 


1.  If  this  is  the  first  time  through: 

a.  Set  the  record  length  (LRECL)  and  the  size  of  the  Telemetry  data  block  (NTMWDS),  based 
upon  the  instrument  type,  and  initialize  the  primary  indexed  write  key. 

b.  Open  the  keyed,  indexed  file,  defining  the  primary  key  as  the  sequential  record  count  and  the 
alternate  key  as  the  location  of  the  Ephemeris  time  in  each  record. 

c.  If  the  open  was  not  successful,  set  the  proper  indicators,  invoke  ERRLOG  to  write  an 
informative  message,  and  return  to  BNBA. 

2.  Increment  the  primary  (output)  key. 

3.  Write  the  current  set  of  Ephemeris,  time,  and  telemetry  data  to  the  work  file. 

4.  If  the  write  was  not  successful,  set  the  proper  indicators,  and  invoke  ERRLOG  to  write  an 
informative  message. 

5.  Return  to  BNBA. 

d.  Outputs. 

1.  Argument  list. 

KEYOUT  -  Number  of  last  record  written  to  file 
IWOSTAT  -  I/O  status  value: 

=  0:  No  error 

>  0:  Open  or  write  error  occurred 


2.  Files. 

WORKFIL  -  The  temporary  file  to  which  the  current  1  minute  set  of  data  is  written. 

e.  Associated  subroutines. 

1.  Subroutine  ERRLOG.  I/O  error  reporting. 

f.  Interfaces. 

1.  Called  by  the  main  routine. 

2.  Uses  COMMON  block  WORKREC. 


2.6.7  Subroutine  WORKIN. 
a.  Function. 

Read  the  unpacked  Ephemeris/Telemetry  data  records  from  the  intermediate  storage  file  in 
ascending  time  order  by  using  the  alternate  key. 
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b.  Inputs. 


1.  Argument  list. 


WORKFILNAM  -  Full  path  name  for  the  work  file 
IWRKUNIT  -  Unit  number  of  the  work  file 
IESTYP  -  Instrument  indicator  code: 

1  =  IES,  2  =  IES2,  3  =  IES2A,  4  =  IES3 

2.  COMMON  blocks. 


/WORKREC/ 

ICUR  -  Pointer  to  current  data  buffer 


3.  Files. 

WORKFIL  -  The  temporary  file  from  which  the  current  1  minute  set  of  data  is  read. 


c.  Processing. 

1.  If  this  is  the  first  time  through: 

a.  Set  the  record  length  (LRECL)  and  the  size  of  the  Telemetry  data  block  (NTMWDS)  based 
upon  the  instrument  type. 

b.  Open  the  keyed,  indexed  file  with  the  primary  key  as  the  sequential  record  count  and  the 
alternate  key  pointing  to  the  Ephemeris  time  in  each  record. 

c.  If  the  open  was  not  successful,  set  the  proper  indicators,  invoke  ERRLOG  to  write  an 
informative  message,  and  return  to  BNBA. 

d.  Establish  the  use  of  the  alternate  key  and  read  the  earliest  (in  time)  set  of  Ephemeris,  time, 
and  Telemetry  data  into  the  current  (ICUR)  buffers. 

2.  Otherwise,  read  the  next  (in  ascending  time  order)  data  record. 

3.  If  the  read  was  not  successful,  set  the  proper  indicators,  and  invoke  ERRLOG  to  write  an 

informative  message. 

4.  Return  to  BNBA. 


d.  Outputs. 

1.  Argument  list. 
IWISTAT 


I/O  status  value: 

=  0:  No  error 

>  0:  Open  or  read  error  occurred 
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2.  COMMON  blocks. 


/WORKREC/ 


ICUR 

IPHVAL 

itmsec 

ITMUPK 


Pointer  to  current  minute  data  buffer 
Unpacked  Ephemeris  data 
Telemetry  data  times 
Unpacked  Telemetry  data 


e.  Associated  subroutines. 


1.  Subroutine  ERRLOG.  I/O  error  reporting. 


f.  Interfaces. 


1.  Called  by  the  main  routine. 

2.  Uses  COMMON  block  WORKREC. 


2.6.8  Subroutine  GET  XCEPTS. 


a.  Function. 

Control  the  processing  of  telemetry  data  exceptions  for  all  instrument  types.  An  exception  is 
defined  as: 


1.  A  data  quantity  whose  Common  Format  data  cycle  differs  from  its  instrument  telemetry  data 
cycle. 

2.  A  quantity  whose  Common  Format  data  rate  differs  from  its  instrument  telemetry  data  rate. 

3.  A  data  quantity  which  is  created  by  BNBA  from  instrument  telemetry  data  and  stored  in  the 
Common  Format. 

b.  Inputs. 


1.  Argument  list. 

IESTYP  -  Specified  IES  instrument  indicator  code: 

1  =  IES,  2  =  IES2,  3  =  IES2A,  4  =  IES3 

2.  COMMON  blocks. 

/WORKREC/ 


ICUR 

IPREV 

IXVAL 


Pointer  to  current  1  minute  data  record 
Pointer  to  previous  1  minute  data  record 
Array  of  telemetry  storage  exception  values 
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3.  Files. 


None. 

c.  Processing. 

1.  Initialize  the  exceptions  array  for  the  current  minute  of  data  to  null  values  (-1). 

2.  Propagate  any  forward-filled  data  exceptions  by  copying  the  extra  4  cycles  (61  -  64)  from  the 
previous  minute’s  exception  set  into  the  first  4  cycles  of  the  current  minute’s  exception  set. 

3.  Invoke  the  subroutine  which  processes  exceptions  for  the  specified  instrument’s  telemetry  data. 

a.  When  IESTYP  is  1,  invoke  IES  XCEPT. 

b.  When  IESTYP  is  2,  invoke  IES2_XCEPT. 

c.  When  IESTYP  is  3,  invoke  IES2A_XCEPT. 

d.  When  IESTYP  is  4,  invoke  IES3_XCEPT. 

4.  Return  to  BNBA. 

d.  Outputs. 

1.  Argument  list. 

None. 

2.  COMMON  blocks. 

/WORKREC/ 

IXVAL  -  Array  of  telemetry  storage  exception  values 

e.  Associated  subroutines. 

1.  Subroutine  IES_XCEPT.  Process  exceptions  for  the  IES  instrument  telemetry  data. 

2.  Subroutine  IES2_XCEPT.  Process  exceptions  for  the  IES2  instrument  telemetry  data. 

3.  Subroutine  IES2A_XCEPT.  Process  exceptions  for  the  IES2A  instrument  telemetry  data. 

4.  Subroutine  IES3_XCEPT.  Process  exceptions  for  the  IES3  instrument  telemetry  data. 

f.  Interfaces. 

1.  Called  by  BNBA. 

2.  Uses  COMMON  block  WORKREC. 
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2.6.8. 1  Subroutine  IES_XCEPT. 
a.  Function. 

Process  telemetry  data  exceptions  specific  to  the  IES  instrument  configuration.  The  specific  IES 
exceptions  are  listed  in  Table  3. 

Table  3  IES  exceptions  list 


Num 

INTO 

FROM 

VARIABLE  NAME 

Cycle  Word 

Cycle 

Word/Bits 

1 

1 

14 

2 

111/all 

Ion  Velocity 

2 

1 

145 

1 

1/9 

Cyclel  MSB 

3 

1 

146 

1 

1/6-8 

EP  Mode 

4 

1 

147 

always=2  for 

IES 

EP/RPA  Flag 

5 

1 

148 

1 

1/5 

Test  Mode 

6 

1 

149 

1 

1/4 

Bias  Mode 

7 

1 

150 

1 

1/3 

Sweep  Clock 

8 

1 

151 

1 

1/2 

PRF/Reset 

9 

1 

155 

1 

90/2-3 

VIP  Setting 

10 

1 

156 

1 

90/1-5 

VBIAS  Volts 

11 

1 

158 

1&2 

1/ 

Cycle  Count 

1 

2 

15 

1 

61/all 

DM  Signal  Level 

2 

2 

145 

1 

1/9 

Cyclel  MSB 

3 

2 

146 

1 

1/6-8 

EP  Mode 

4 

1 

147 

always=2  for 

IES 

EP/RPA  Flag 

5 

2 

151 

2 

70/9 

VBias  Monitor 

6 

2 

155 

2 

90/7-8 

VIP  Setting 

7 

2 

156 

2 

90/1-5 

VBIAS  Volts 

8 

2 

158 

1&2 

Cycle  Count 

b.  Inputs. 

1.  Argument  list. 

None. 

2.  COMMON  blocks. 

AVORKREC/ 

ICUR  -  Pointer  to  current  1  minute  data  buffers 

IPREV  -  Pointer  to  previous  1  minute  data  buffers 

ITMUPK  -  Unpacked  telemetry  data  buffers 

3.  Files. 

None. 
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c.  Processing. 


1.  Establish  a  loop  to  process  each  of  the  60  one-second  telemetry  data  blocks  in  the  current  1 
minute  buffer. 

2.  Invoke  Subroutine  VALCHEK  to  validity  check  the  specified  second’s  worth  of  data. 

a.  If  the  data  are  not  valid,  set  the  cycle  indicator  to  the  null  value  (-1),  set  the  break 
indicator  to  .TRUE,  to  indicate  a  discontinuity,  and  proceed  to  the  next  second’s  worth  of 
data. 

b.  If  the  data  are  valid,  proceed  to  step  3. 

3.  Calculate  the  data  cycle  from  the  Cycle  ID  and  store  it  in  the  data  cycle  indicator. 

4.  If  this  is  a  Cycle  1  data  set: 

a.  Invoke  Subroutine  CYCNT1  to  extract  the  exceptions  from  the  Cycle  ID  and  the 
Configuration  ID  words. 

b.  Save  the  exceptions  which  appear  in  the  Cycle  1  instrument  telemetry  data  set. 

5.  If  this  is  a  Cycle  2  data  set: 

a.  Invoke  Subroutine  CYCNT2  to  extract  the  exceptions  from  the  Cycle  ID  and  Configuration 
ID  words. 

b.  Save  the  exceptions  which  appear  in  the  Cycle  2  instrument  telemetry  data  set. 

6.  When  all  60  cycles  (seconds)  have  been  processed,  return  to  Subroutine  GETXCEPTS. 

d.  Outputs. 

1.  Argument  list. 

None. 

2.  COMMON  blocks. 

/WORKREC/ 

NCYCLE  -  Array  of  Cycle  indicators 

IXVAL  -  Array  of  saved  exceptions 

e.  Associated  subroutines. 

1.  Subroutine  VALCHEK.  Validity  check  the  telemetry  data. 

2.  Subroutine  CYCNT1.  Process  Cycle  ID  and  Configuration  ID  for  Cycle  1. 

3.  Subroutine  CYCNT2.  Process  Cycle  ID  and  Configuration  ID  for  Cycle  2. 
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f.  Interfaces. 


1.  Called  by  Subroutine  GET_XCEPTS. 

2.  Uses  COMMON  block  WORKREC. 

2.6.8.1.1  Subroutine  VALCHEK. 

a.  Function. 

Check  the  validity  of  the  unpacked  telemetry  data  for  the  specified  second. 

b.  Inputs. 

1.  Argument  list. 

IESTYP  -  Specified  1ES  instrument  indicator  code: 

1  =  IES,  2  =  IES2,  3  =  IES2A,  4  =  IES3 
J  -  Specified  second  of  data 

2.  COMMON  blocks. 

/WORKREC/ 

ICUR  -  Pointer  to  current  1  minute  data  record 

ITMUPK  -  Unpacked  telemetry  data  buffer 

3.  Files. 

None. 

c.  Processing. 

1.  Initialize  the  cycle  indicator  for  this  second  of  the  current  minute’s  telemetry  data  buffer. 

2.  When  the  telemetry  Cycle  ID  is  a  non-zero  positive  number,  the  data  are  valid. 

3.  When  the  Cycle  ID  is  zero  or  negative,  the  data  are  not  valid  when  the  following  are  all  zero  or 
negative: 

a.  For  the  IES  instrument: 

EP  Sweep  Voltage 
RPA  Sweep  Voltage 
SM  (WIBAN1)  Range 
DM  Log  Level  Amplifier 

b.  For  IES2,  IES2A,  and  (probably)  1ES3  instrument: 

Configuration  ID 
DM  Log  Level  Amplifier 
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SM  (WIBAN1)  Range 
DM  (WIBAN2)  Range 

Otherwise,  the  data  are  valid. 


4.  When  the  data  are  not  valid  set  this  second’s  cycle  indicator  to  a  null  value  (-1). 

5.  Return  to  the  calling  routine. 

d.  Outputs. 

1.  Argument  list. 

None. 

2.  COMMON  blocks. 

/WORKREC/ 

NCYCLE  -  Array  of  cycle  indicators 

e.  Associated  subroutines. 

None. 

f.  Interfaces. 

1.  Called  by  IES_XCEPT,  IES2_XCEPT,  IES2A_XCEPT,  IES3_XCEPT,  CYCNT1,  and  CYCNT2. 

2.  Uses  COMMON  block  WORKREC. 


2.6.8.1.2  Subroutine  CYCNT1. 

a.  Function. 

Update  the  running  cycle  counter  and  extract  the  exceptions  data  from  the  Cycle  1  ID  and 
Configuration  ID  words. 

b.  Inputs. 

1.  Argument  list. 

BREAK 

IESTYP 
J 

IXBITS 
NCYCNT 


Data  cycle  interrupt  indicator  (LOGICAL): 

.TRUE.  -  previous  cycle  contained  invalid  data  or  this  is  the  first 
cycle  processed 

.FALSE.  -  previous  cycle  was  valid 
Specified  IES  instrument  indicator  code: 

1  =  IES,  2  =  IES2,  3  =  IES2A,  4  =  IES3 
Specified  second  of  data 

Array  of  Cycle  ID  and  Configuration  ID  exceptions  values 
Running  cycle  counter 
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2.  COMMON  blocks. 


/WORKREC/ 

ICUR  -  Pointer  to  current  1  minute  data  buffer 

ITMUPK  -  Unpacked  telemetry  data  buffer 

3.  Files. 

None. 

c.  Processing. 

1.  Extract  the  MSB  and  the  EP  mode  indicator  bits  from  the  Cycle  ID  and  save  the  values  in  the 
exceptions  array. 

2.  Adjust  the  EP  mode  indicator  to  the  Common  Format  value  when  the  data  are  from  IES. 

3.  If  this  is  the  first  cycle  processed  or  the  previous  cycle  contained  invalid  data  (BREAK  is 
.TRUE.): 

a.  Set  the  running  cycle  counter  to  zero. 

b.  If  this  is  not  the  last  second  of  data  in  the  current  buffer,  invoke  VALCHK  to  validity  check 
the  next  second  of  data,  which  should  be  a  Cycle  2  second. 

c.  If  the  next  second  of  data  is  valid,  set  the  cycle  interrupt  flag  (BREAK)  to  .FALSE,  and 
invoke  CYCNT2  to  establish  the  running  cycle  counter. 

4.  Adjust  the  running  cycle  counter  to  the  proper  value  for  the  (missing)  previous  cycle. 

5.  Extract  the  remaining  bits  of  information  from  the  Cycle  ID  word  and  store  the  values  in  the 

exceptions  block. 

6.  When  the  instrument  is  IES2,  IES2A,  or  IES3,  extract  the  necessary  bits  from  the  Configuration 
ID  word  and  store  the  values  in  the  exceptions  block. 

7.  Update  the  running  cycle  counter. 

a.  If  the  running  cycle  counter  is  1024,  reset  it  to  1. 

b.  If  the  EP  mode  is  A,  B,  BS,  or  E  and  the  running  cycle  counter  is  128,  reset  it  to  1. 

c.  Otherwise  increment  the  running  cycle  counter  by  1. 

8.  Return  to  the  calling  routine. 
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d.  Outputs. 


1.  Argument  list. 

BREAK  -  Data  cycle  interrupt  indicator  (LOGICAL): 

.TRUE.  -  previous  cycle  contained  invalid  data  or  this  is  the  first 
cycle  processed 

.FALSE.  -  previous  cycle  was  valid 

IXBITS  -  Array  of  Cycle  ID  and  Configuration  ID  exceptions  values 

NCYCNT  -  Running  cycle  counter 

2.  COMMON  blocks. 

None. 

e.  Associated  subroutines. 

1.  Subroutine  VALCHEK.  Validity  check  the  telemetry  data. 

2.  Subroutine  CYCNT2.  Process  Cycle  ID  and  Configuration  ID  for  Cycle  2. 

f.  Interfaces. 

1.  Called  by  IES_XCEPT,  IES2_XCEPT,  IES2A_XCEPT,  IES3_XCEPT,  and  CYCNT2. 

2.  Uses  COMMON  block  WORKREC. 


2.6.8.1.3  Subroutine  CYCNT2. 

a.  Function. 

Update  the  running  cycle  counter  and  extract  the  exceptions  data  from  the  Cycle  2  ID  and 
Configuration  ID  words. 

b.  Inputs. 

1.  Argument  list. 

BREAK 

IESTYP 
J 

IXBITS 
NCYCNT 


Data  cycle  interrupt  indicator  (LOGICAL): 

.TRUE.  -  previous  cycle  contained  invalid  data  or  this  is  the  first 
cycle  processed 

.FALSE.  -  previous  cycle  was  valid 
Specified  IES  instrument  indicator  code: 

1  =  IES,  2  =  IES2,  3  =  IES2A,  4  =  IES3 
Specified  second  of  data 

Array  of  Cycle  ID  and  Configuration  ID  exceptions  values 
Running  cycle  counter 
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2. 


COMMON  blocks. 


/WORKREC/ 

ICUR  -  Pointer  to  current  1  minute  data  buffer 

ITMUPK  -  Unpacked  telemetry  data  buffer 

3.  Files. 

None. 

c.  Processing. 

1.  If  this  is  the  first  cycle  processed  or  the  previous  cycle(s)  contained  invalid  data  (BREAK  is 
.TRUE.): 

a.  Set  the  running  cycle  counter  to  zero. 

b.  If  this  is  not  the  last  second  of  data  in  the  current  buffer,  invoke  VALCHK  to  validity  check 
the  next  second  of  data,  which  should  be  a  Cycle  1  second. 

c.  If  the  next  second  of  data  is  valid,  set  the  cycle  interrupt  flag  (BREAK)  to  .FALSE,  and 
invoke  CYCNT1  to  get  the  EP  mode  and  the  Cycle  1  ID  MSB. 

2.  If  this  is  IES  instrument  data,  set  the  EP/RPA  processing  indicator  to  process  both  types  of  data. 

3.  If  this  is  IES2,  IES2A,  or  IES3  instrument  data,  extract  the  necessary  bits  from  the  Configuration 
ID  and  store  the  values  for  exceptions  processing. 

4.  Calculate  the  running  cycle  counter  from  the  Cycle  2  ID  and  the  Cycle  1  MSB. 

5.  If  the  EP  mode  is  C,  D,  or  DS  and: 

a.  the  running  cycle  counter  is  0,  reset  it  to  512, 

b.  or,  if  the  running  cycle  counter  is  512,  reset  it  to  1024, 

c.  otherwise,  if  the  running  cycle  counter  is  0  reset  it  to  128. 

6.  Return  to  the  calling  routine. 

d.  Outputs. 

1.  Argument  list. 

BREAK  -  Data  cycle  interrupt  indicator  (LOGICAL): 

.TRUE.  -  previous  cycle  contained  invalid  data  or  this  is  the  first 
cycle  processed 

.FALSE.  -  previous  cycle  was  valid 

IXBITS  -  Array  of  Cycle  ID  and  Configuration  ID  exceptions  values 

NCYCNT  -  Running  cycle  counter 
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2.  COMMON  blocks. 


None. 

e.  Associated  subroutines. 

1.  Subroutine  VALCHEK.  Validity  check  the  telemetry  data. 

2.  Subroutine  CYCNT1.  Process  Cycle  ID  and  Configuration  ID  for  Cycle  1. 

f.  Interfaces. 

1.  Called  by  IES_XCEPT,  IES2_XCEPT,  IES2A_XCEPT,  IES3_XCEPT,  and  CYCNT1. 

2.  Uses  COMMON  block  WORKREC. 

2.6.8.2  Subroutine  IES2_XCEPT. 
a.  Function. 

Process  telemetry  data  exceptions  specific  to  the  IES2  instrument  configuration.  The  specific  IES2 
exceptions  are  listed  in  Table  4. 

All  inputs,  processing,  outputs,  associated  subroutines,  and  interfaces  are  as  described  for 
Subroutine  IES  XCEPT  (see  2.6.8. 1). 

2.6.8.3  Subroutine  IES2A  XCEPT. 
a.  Function. 

Process  telemetry  data  exceptions  specific  to  the  IES2A  instrument  configuration.  The  specific 
IES2A  exceptions  are  listed  in  Table  5. 

All  inputs,  processing,  outputs,  associated  subroutines,  and  interfaces  are  as  described  for 
Subroutine  IES_XCEPT  (see  2.6.8. 1). 


2.6.8.4  Subroutine  IES3_XCEPT. 
a.  Function. 

Process  telemetry  data  exceptions  specific  to  the  IES3  instrument  configuration.  The  specific  IES3 
exceptions  will  be  listed  in  Table  6. 

As  of  May  1994,  the  content  and  format  of  the  IES3  telemetry  data  has  not  been  defined  to  the 
level  of  detail  needed  to  implement  the  exceptions  processing  for  the  instrument.  This  subroutine 
is  currently  implemented  as  a  stub  and  will  be  fully  implemented  when  the  IES3  telemetry 
definition  is  finalized. 
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Table  4  IES2  exceptions  list 


Num 

INTO 

FROM 

VARIABLE  NAME 

Cycle  Word 

Cycle 

Word/Bits 

1 

1 

10 

2 

6/all 

VIP  Bias 

2 

1 

12 

2,6,10. . . 

63/all 

DM  LLA 

3 

1 

13 

2 

ll/all 

Vp  EL 

4 

1 

14 

2 

10/all 

Ion  Velocity 

5 

1 

15 

2 

64/all 

DM  Signal  Level 

6 

1 

16 

2 

65/all 

SM  (WIBAN1)  Range 

7 

1 

17 

2 

66/all 

DM  (WIBAN2)  Range 

8 

1 

145 

1 

1/9 

Cyclel  MSB 

9 

1 

146 

1 

1/6-8 

EP  Mode 

10 

1 

147 

2 

2/5 

EP/RPA  Flag 

11 

1 

148 

1 

1/5 

Test  Mode 

12 

1 

149 

1 

1/4 

Bias  Mode 

13 

1 

150 

1 

1/3 

Sweep  Clock 

14 

1 

151 

1 

1/2 

PRF/Reset 

15 

1 

152 

1 

2/9 

RAM/ PROM 

16 

1 

153 

1 

2/8 

Test/Fit 

17 

1 

154 

1 

2/1-7 

Prog.  Vers. 

18 

1 

155 

2 

6/7-8 

VIP  Set 

19 

l 

156 

2 

6/1-5 

VBias  Volts 

20 

1 

158 

1&2 

1/ 

Cycle  Count 

1 

2 

8 

14,30,46. 

. .  62/all 

DM  Electron  Temp. 

2 

2 

9 

1 

6/all 

Vap  Monitor 

3 

2 

11 

1 

7/all 

RPA  Monitor 

4 

2 

12 

4,8,12.. 

.  63/all 

DM  LLB 

5 

2 

13 

1 

10/all 

Vp  RPA 

6 

2 

20 

14,30,46. 

. .  61/all 

DSM  Sensor  Temp. 

7 

2 

145 

1 

1/9 

Cyclel  MSB 

8 

2 

146 

1 

1/6-8 

EP  Mode 

9 

2 

147 

2 

2/5 

EP/RPA  Flag 

10 

2 

148 

2 

2/7 

CkSum  Err. 

11 

2 

149 

2 

2/6 

Uplink  Flag 

12 

2 

150 

Null  Value 

13 

2 

151 

Null  Value 

14 

2 

152 

2 

2/9 

RAM  Err. 

15 

2 

153 

2 

2/8 

Dump  Flag 

16 

2 

154 

2 

2/1-3 

Serial  Number 

17 

2 

155 

2 

6/7-8 

VIP  Set 

18 

2 

156 

2 

6/1-5 

VBias  Volts 

19 

2 

158 

1&2 

Cycle  Count 

221 


Table  5  IES2A  exceptions  list 

Num  INTO  FROM  VARIABLE  NAME 

Cycle  Word  Cycle  Word/Bits 


1 

1 

4 

3,7,11. . 

5/all 

TH+ 

2 

1 

5 

3,7,11. . 

12/all 

TO+ 

3 

1 

6 

1,5,9... 

12/all 

TE+ 

4 

1 

10 

2 

6/all 

VIP  Bias 

5 

1 

11 

1,5,9... 

ll/all 

EP  Monitor 

6 

1 

12 

2,6, 10  .  . . 

63/all 

DM  LLA 

7 

1 

13 

2,6,10. . . 

ll/all 

Vp  EL 

8 

1 

15 

2 

64/all 

DM  Signal  Level 

9 

1 

16 

2 

65/all 

SM  (WIBAN1)  Range 

10 

1 

17 

2 

66/all 

DM  (WIBAN2 )  Range 

11 

1 

21 

1,5,9.  .  . 

5/all 

RPA  Thermistor 

12 

1 

145 

1 

1/9 

Cyclel  MSB 

13 

1 

146 

1 

1/6-8 

EP  Mode 

14 

1 

147 

2 

2/5 

EP/RPA  Flag 

15 

1 

148 

1 

1/5 

Test  Mode 

16 

1 

149 

1 

1/4 

Bias  Mode 

17 

1 

150 

1 

1/3 

Sweep  Clock 

18 

1 

151 

1 

1/2 

PRF/Reset 

19 

1 

152 

1 

2/9 

RAM/ PROM 

20 

1 

153 

1 

2/8 

Test/Fit 

21 

1 

154 

1 

2/1-7 

Prog.  Vers. 

22 

1 

155 

2 

6/7-8 

VIP  Set 

23 

1 

156 

2 

6/1-5 

VBias  Volts 

24 

1 

158 

1&2 

1/ 

Cycle  Count 

1 

2 

4 

4,8,12.  .  . 

5/all 

NH+ 

2 

2 

5 

4,8,12... 

12/all 

NO+ 

3 

2 

6 

2,6,10. . . 

12/all 

NE+ 

4 

2 

8 

14,30,46.  .  . 

62/all 

DM  Electron  Temp. 

5 

2 

9 

1 

6/all 

Vap  Monitor 

6 

2 

11 

3,7,11. .  . 

ll/all 

RPA  Monitor 

7 

2 

12 

4  f 8 , 12  •  •  • 

63/all 

DM  LLB 

8 

2 

13 

4/8/12* • • 

ll/all 

Vp  RPA 

9 

2 

20 

14,30,46. . . 

61/all 

DSM  Sensor  Temp. 

10 

2 

21 

2,6,10. . . 

5/all 

EP  Thermistor 

11 

2 

145 

1 

1/9 

Cyclel  MSB 

12 

2 

146 

1 

1/6-8 

EP  Mode 

13 

2 

147 

2 

2/5 

EP/RPA  Flag 

14 

2 

148 

2 

2/7 

CkSum  Err. 

15 

2 

149 

2 

2/6 

Uplink  Flag 

16 

2 

150 

Null  Value 

17 

2 

151 

Null  Value 

18 

2 

152 

2 

2/9 

RAM  Err. 

19 

2 

153 

2 

2/8 

Dump  Flag 

20 

2 

154 

2 

2/1-3 

Serial  Number 

21 

2 

155 

2 

6/7-8 

VIP  Set 

22 

2 

156 

2 

6/1-5 

VBias  Volts 

23 

2 

158 

1&2 

Cycle  Count 

All  inputs,  processing,  outputs,  associated  subroutines,  and  interfaces  will  be  as  described  for 
Subroutine  IES_XCEPT  (see  2.6.8.1). 
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Table  6  IES3  exceptions  list 


Num  INTO  FROM  VARIABLE  NAME 

Cycle  Word  Cycle  Word/Bits 


TBS 

2.6.9  Subroutine  STOREM. 

a.  Function. 

Store  the  unpacked  telemetry  data  from  any  of  the  IES  instrument  variants  into  the  Common 
Format  for  the  APGA  program. 

b.  Inputs. 

1.  Argument  list. 

IESTYP  -  Specified  IES  instrument  indicator  code: 

1  =  IES,  2  =  IES2,  3  =  IES2A,  4  =  IES3 
KOUT  -  Pointer  to  the  1  minute  data  buffer  to  be  reformatted 

2.  COMMON  blocks. 

/WORKREC/ 

IPHVAL  -  Unpacked  Ephemeris  data  buffer 

ITMUPK  -  Unpacked  telemetry  data  buffer 

NCYCLE  -  Telemetry  data  cycle  indicators  buffer 

ITMSEC  -  Telemetry  data  times  buffer 

IXVAL  -  Telemetry  data  exceptions  buffer 

3.  Files. 

None. 

c.  Processing. 

Storage  of  telemetry  data  from  the  original  format  (ITMUPK)  into  the  Common  Format  (INOLS)  is 
table  driven.  Each  IES  variant  has  its  own  unique  storage  mapping  (table)  to  control  the  storage  from 
its  telemetry  format  and  exceptions  list  into  the  Common  Format. 

The  exceptions  are  accessed  in  order  during  storage  into  the  output  array;  i.e.:  the  Mlh  occurrence  of 
the  exceptions  flag  (MEX)  in  the  mapping  table  will  cause  the  Mth  value  from  the  exceptions  block  to 
be  stored  in  the  current  position  of  the  output  array. 

A  null  flag  (MNV)  in  the  mapping  table  indicates  that  the  data  quantity  for  that  Common  Format 
location  does  not  exist  in  the  telemetry  data  for  the  given  instrument  type  and/or  data  cycle.  This  flag 
causes  a  null  value  (-1)  to  be  stored  in  the  corresponding  position  of  the  output  array. 
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1.  Store  the  Ephemeris  data  for  the  selected  minute  into  the  output  buffer. 

2.  Establish  a  loop  to  store  each  second  of  the  selected  minute’s  Telemetry  data  into  the  output 
buffer,  and,  for  each  iteration  of  the  loop: 

a.  Store  the  Telemetry  time  value  into  the  output  buffer, 

b.  Initialize  the  exceptions  counter  to  zero, 

# 

c.  Determine  the  cycle  type  (1  or  2)  for  the  current  second, 

d.  Establish  a  loop  to  store  a  value  into  each  location  of  the  output  buffer  (1  -  160). 

1.  If  the  data  cycle  type  is  invalid,  store  a  null  value  (-1)  into  the  current  location  of  the 
output  buffer. 

2.  Otherwise,  retrieve  the  mapping  value  for  the  current  location  from  the  proper 
instrument/cycle  map  and: 

a.  Store  the  value  from  the  telemetry  data  buffer  location  indicated  by  the  mapping 
value  into  the  current  location  of  the  output  buffer. 

or 

b.  When  the  mapping  value  is  the  exceptions  flag  (MEX),  increment  the  exceptions 
counter  and  store  the  value  from  the  exceptions  buffer  location  indicated  by  the 
exceptions  counter  into  the  current  location  of  the  output  buffer. 

or 

c.  When  the  mapping  value  is  the  null  value  flag  (MNV),  store  a  null  value  (-1)  into 
the  current  location  of  the  output  buffer. 

or 

d.  When  the  mapping  value  is  the  constants  flag  (MCO),  store  a  constant  value  into 
the  current  location  of  the  output  buffer. 

3.  Return  to  BNBA. 

d.  Outputs. 

1.  Argument  list. 

None. 

2.  COMMON  blocks. 

/OUTREC/ 

IPHVAL  -  One  minute  block  of  Ephemeris  data 

ISECOLS  -  One  minute  block  of  telemetry  data  times 

INOLS  -  One  minute  block  of  reformatted  telemetry  data 
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e. 


Associated  subroutines. 


None, 
f.  Interfaces. 

1.  Called  by  BNBA. 

2.  Uses  COMMON  blocks  WORKREC  and  OUTREC. 


2.6.10  Subroutine  OUTPUT. 

a.  Function. 

Write  the  reformatted  R1R,  Ephemeris,  Telemetry  time,  and  Telemetry  data  buffers  to  the  output 
file. 

b.  Inputs. 

1.  Argument  list. 


IESPREPFIL  - 

Full  path  name  for  the  Prepfile 

IOUTUNIT  - 

Unit  number  of  the  output  file 

2. 

COMMON  blocks. 

/OUTREC/ 

IPHOUT  - 

Reformatted  Ephemeris  data  buffer 

ISECOLS  - 

Telemetry  data  times  buffer 

INOLS 

Reformatted  Telemetry  data  buffer 

/OUTRIR/ 

IRIROUT  - 

Reformatted  RIR  data  buffer 

Processing. 

1. 

If  this  is  the  first  time  through,  open  the  output  file  and  write  the  RIR  data  buffer. 

2. 

Write  the  Ephemeris,  Telemetry  times,  and  Telemetry  data  buffers  to  the  output  file  as  a  single 

record. 

3.  Return  to  BNBA. 


d.  Outputs. 

1.  Argument  list. 
None. 


225 


2.  Files. 


PREPFILE  -  The  file  to  which  the  current  1  minute  set  of  reformatted  data  is  written. 

e.  Associated  subroutines. 

None. 

f.  Interfaces. 

1.  Called  by  BNBA. 

2.  Uses  COMMON  blocks  OUTREC  and  OUTRIR. 
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SECTION  3.  ENVIRONMENT 


3.1  Equipment  Environment. 

The  SSIES  Flight  Data  Processor  (FDP)  System  has  a  major  restriction  mandated  by  the  structure  of 
the  raw  data  Mission  Sensor  file  received  at  AFSFC  from  AFGWC.  This  file  consists  of  data  packed 
as  four  9-bit  telemetry  words  stored  in  36-bit  Sperry  UNIVAC  words.  The  BNBA  program  reads  the 
data  into  a  VAX  computer  system  and  manipulates  the  data  according  to  the  specific  constructs 
imposed  on  the  input  data  by  the  VAX  internal  storage  format.  The  BNBA  program  will  require 
extensive  modification  to  run  properly  on  a  system  whose  internal  data  storage  conventions  do  not 
map  exactly  to  those  of  the  VAX. 

The  only  other  equipment  constraints  are  that  the  hardware  must  have  enough  main  memory  to  load 
and  execute  the  APGA  program  and  have  enough  direct  access  mass  storage  space  for  the  various  files 
(see  Section  3.3.2  for  file  sizes). 


3.2  Support  Software. 

The  following  system  routines  are  required  for  the  SSIES  FDP  system: 

a.  Program  APGA. 

1.  VAX  intrinsic  functions:  IDATE,  TIME 

b.  Program  BNBA. 

1.  VAX  intrinsic  functions:  IBITS,  MVBITS 

c.  Program  LDCON02. 

None. 


3.3  Data  Base. 

The  data  base  file  system  consists  of  multiple  files;  some  are  used  exclusively  as  inputs,  some  are 
output  by  one  processing  program  and  input  by  another,  and  some  are  exclusively  output  files. 

3.3.1  General  Characteristics. 

3.3. 1.1  Input  Data  Base. 

3.3.1. 1.1  SSIES  Mission  Sensor  Raw  Data  File. 

a.  Name:  TBS  by  AFSFC. 

b.  Usage:  Transmitted  to  AFSFC  from  AFGWC.  This  is  the  input  file  for  the  BNBA  data  unpacking 
and  reformatting  program. 

c.  Data  Permanence:  TBS  by  AFSFC. 
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d.  Storage:  This  file  is  located  on  a  mass  storage  disk.  The  record  and  file  sizes  are  variable. 

e.  Access  type:  INDEX/KEYED 

f.  Format:  BINARY 

g.  Restrictions:  The  BNDA  program  records  this  file.  The  BNBA  program  uses  the  file  on  a  read¬ 
only  basis. 

3.3.1. 1.2  SSIES  Common  Format  Data  File. 

a.  Name:  IESPREPFILE. 

b.  Usage:  Produced  by  the  BNBA  program  and  used  as  the  primary  input  to  the  APGA  program. 

c.  Data  Permanence:  TBD  by  AFSFC. 

d.  Storage:  This  file  is  located  on  a  mass  storage  disk.  The  size  of  this  file  is  variable,  but  a  nominal 
estimate  of  size  is  500,000  words  for  101  fixed  length  records  of  4888  words  each.  This  estimate 
approximates  the  amount  of  data  in  a  single  readout  REV. 

e.  Access  Type:  SEQUENTIAL 

f.  Format:  BINARY 

g.  Restrictions:  None. 

3.3. 1.2  Output  Data  Base. 

3.3. 1.2.1  Environmental  Data  Record  File. 

a.  Name:  IESEDRFILE. 

b.  Usage:  Loaded  and  controlled  by  the  APGA  program. 

c.  Data  Permanence:  TBD  by  AFSFC. 

d.  Storage:  This  file  is  located  on  a  mass  storage  disk.  The  file  consists  of  a  variable  number  of  1791 
word  fixed  length  records. 

e.  Access  type:  DIRECT 

f.  Format:  BINARY 

g.  Restrictions:  None. 

3.3.1.2.2  Statistical  Information  File. 

a.  Name:  IESSTATFILE. 

b.  Usage:  This  file  is  created  by  the  APGA  program. 
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c.  Data  Permanence:  The  data  in  this  file  are  perishable. 

d.  Storage:  This  file  is  located  on  a  mass  storage  disk.  The  file  consists  of  a  variable  number  of  833 
word  fixed  length  records. 

e.  Access  type:  DIRECT 

f.  Format:  BINARY 

g.  Restrictions:  None. 

3.3. 1.2.3  AGDB  Transfer  Files. 

a.  Name:  IESAGDBXFR1  (and  IESAGDBXFR2). 

b.  Usage:  These  files  are  created  the  APGA  program. 

c.  Data  Permanence:  The  data  in  these  files  are  perishable. 

d.  Storage:  These  files  are  located  on  a  direct  access  mass  storage  disk.  The  files  consist  of  a  variable 
number  of  1791  word  fixed  length  records. 

e.  Access  type:  DIRECT 

f.  Format:  BINARY 

g.  Restrictions:  None. 

3.3. 1.3  Control/Information  Data  Base. 

3.3. 1.3.1  APGA  Program  Control  file. 

a.  Name:  IESCNTRLFILE. 

b.  Usage:  This  file  is  built  using  program  LDCON02  and  accessed  by  the  APGA  program. 

c.  Data  Permanence:  This  is  a  quasi-permanent  file  which  is  modified  only  when  one  of  the  control 
parameters  in  the  file  needs  to  be  updated  or  a  new  satellite  is  added. 

d.  Storage:  This  file  is  located  on  a  mass  storage  disk.  The  file  size  is  1095  words  and  contains 
control  parameters  for  a  maximum  of  three  DMSP  spacecraft. 

e.  Access  type:  SEQUENTIAL 

f.  Format:  BINARY 

g.  Restrictions:  None. 
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3.3.1.3.2  Apex  Coordinate  Conversion  File. 

a.  Name:  IESAPEXTABLE. 

b.  Usage:  This  file  is  accessed  by  the  APGA  program. 

c.  Data  Permanence:  This  is  a  permanent  file  which  should  not  be  changed. 

d.  Storage:  This  file  is  located  on  a  mass  storage  disk.  The  file  size  is  8203  words. 

e.  Access  type:  SEQUENTIAL 

f.  Format:  BINARY 

g.  Restrictions:  None. 


3.3.2  Organization  and  Detailed  Description. 

3.3.2. 1  SSIES  Mission  Sensor  Raw  Data  File, 

a.  Contents. 

This  file  contains  packed  vehicle,  orbit,  readout  REV,  Ephemeris,  and  telemetry  data  as  downlinked 
from  a  DMSP  SSIES  satellite.  The  data  are  packed  in  the  Sperry  9  bit  byte  and  36  bit  word 
convention. 


b.  Size: 

This  is  a  variable  size  file.  The  actual  size  is  dependent  upon  the  number  of  minutes  of  data 
contained  in  the  file,  and  the  telemetry  configuration  of  the  particular  satellite  from  which  the  data 
originated. 

c.  Format: 

Binary  index/keyed 

I/O  record  size  -  variable  (instrument  dependent) 

Data  record  size  -  variable  (instrument  dependent) 

d.  Structure: 

The  file  consists  of  a  Readout  Information  Record  (RIR),  which  appears  once  as  the  first  record  of 
the  file,  and  an  alternating  sequence  of  ephemeris  and  instrument  telemetry  data  records.  The  exact 
content  and  format  of  the  data  in  these  files  are  described  in  sections  3.3.2.2.4  -  6  of  the  AFGWC  and 
SFC  Interface  Specification. 

3.3.2.2  File  IESPREPFILE. 

A  detailed  description  of  this  file  and  its  contents  can  be  found  in  Volume  2,  Programmer’s  Guide, 
Appendix  8.3.  The  APGA  program  reads  data  from  this  file  in  one  minute  records.  Each  record 
contains  an  ephemeris  data  block  and  60  one  second  data  frames  containing  the  unpacked  SSIES 
sensor  data.  Table  7  lists  the  ephemeris  data  actually  used  by  the  APGA  program,  and  Figure  22  and 
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Table  8  and  Table  9  describe  the  format  and  content  of  the  Common  Format  1  second  data  frame. 
Table  7  DMSP  ephemeris  block  data  used  by  program  APGA 


trd 

Item 

Units 

1 

Latitude  1 

Radians 

2 

Longitude  1 

Radians 

4 

Julian  day  1 

Day-of-year 

5 

Time  1 

Seconds  since 

6 

Latitude  2 

Radians 

7 

Longitude  2 

Radians 

9 

Julian  day  2 

Day-of-year 

10 

Time  2 

Seconds  since 

19 

Altitude  1 

Nautical  miles 

22 

Altitude  2 

Nautical  miles 

23 

Orbit  angle  1 

Radians 

24 

Orbit  angle  2 

Radians 

midnight 


midnight 


Notes: 


1.  Labels  1  and  2  in  the  table  refer  to  the  first  and  second  satellite  locations  in  the  ephemeris  record. 
Location  1  is  the  location  of  the  satellite  at  the  time  of  the  latest  (in  time)  data  frame  in  the  one 
minute  block.  Location  2  is  the  location  of  the  satellite  at  the  time  of  the  earliest  (in  time)  data 
frame  in  the  one  minute  block.  Time  2  is  nominally  60  seconds  prior  to  Time  1. 

2.  The  orbit  angle  is  the  angular  distance  to  the  last  ascending  node  along  the  orbit  track. 
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Word  Number  Word  Identification 


Word  Number  Word  Identification 


Figure  22  Common  Format  data  frame  (part  2) 


Table  8  Common  Format  data  words  (Cycle  1) 


Acronym 

Cycle  ID 
Configuration  ID 
OLS  Command 
T(H+) 

T(0+) 

T  (E) 

Current  Monitor 
MEP  Temp  1 
V(ap)  Monitor 
Vbias  +  Vip  Monitor 
EP  Monitor 
DM  LLA 
VP-EP 
Vsp 

DM  Signal  level 
SM  Range  (WIBAN1) 
DM  Range  (WIBAN2) 
Unused  (NULL) 
Unused  (NULL) 
Unused  (NULL) 

RPA  Temperature 

SM  data 
DM  Data 

RPA  Current  Data 
EP  Current  Data 
SM  Filter 
DM  Filter  (FIBA) 

EP  Sweep  Monitor 
RPA  Sweep  Monitor 
Cycle  1  MSB 
EP  Mode 
EP  /  RPA  Flag 
Test  Mode  Flag 
Bias  Mode  Flag 
Sweep  Clock  Flag 
PRF/Reset  Flag 
RAM  /  PROM  Flag 

Test/Flight  Mode  Flag 

Program  Version 

Vip  Monitor 
Vbias  Monitor 
Instrument  Code 


Cycle  Count 
Unused  (NULL) 


CYCLE  1 


Word 


Description 


1 

2 

3 

4 

5 

6 

7 

8 

9 

10 
11 
12 

13 

14 

15 

16 

17 

18 

19 

20 
21 


22-45 
46  -  57 
58-93 
94  -  117 
118  -  126 
127  -  132 
133  -  138 
139  -  144 

145 

146 

147 

148 

149 

150 

151 

152 

153 

154 

155 

156 

157 


158 

158  -  160 


Cycle  identifier 

Configuration  bits 

Last  command  sent  from  OLS 

H+  Temperature  calculated  by  microprocessor 

O-t-  Temperature  calculated  by  microprocessor 

Electron  temperature  calculated  by  microprocessor 

Current  (+28  V)  Input  from  spacecraft 

Temperature  at  MEP  Electrometer 

Measured  voltage  on  Ion  Array 

Setting  levels  for  V(BIAS)  +  VIP 

Flags  from  microprocessor  EP  analysis 

Output  of  Drift  Meter  log  amplifier  A 

Vehicle  potential  from  calculation  of  EP  data 

Calculated  down-range  relative  plasma  velocity 

Drift  meter  zero  level 

SM  Electrometer/Amplifier  range  setting  indicator 

Drift  meter  range  indicator 

Spare  location 

Spare  location 

Spare  location 

Temperature  from  Thermistor  on  back  of  RPA  sensor 
housing 

Total  Ion  Trap  (SM)  Electrometer/Amplifier  output 
Drift  Meter  offset  output 

Ion  RPA  log  amplifier  output  of  current  to  collector 
Electron  Probe  log  amplifier  output  of  current  to  collector 
Output  from  filters  connected  to  SM  Collector 
Output  from  filters  connected  to  DM  Collector 
Voltage  applied  to  Electron  retarding  grid 
Voltage  applied  to  Ion  RPA  retarding  grid 
Most  Significant  Bit  of  Cycle  ID 

Electron  Probe  operation  mode  indicator  (0  -  6  =  A  -  E) 
Indicates  whether  EP,  RPA,  or  both  types  are  in  telemetry 
0:  OFF,  1:  ON 

1  for  8  second  EP  bias  setting  sweeps,  otherwise  0 
1  for  normal  EP  and  RPA  operation  (sweep  clocks  on) 

1  indicates  that  program  will  restart  on  next  cycle 
Microprocessor  program  source 
0:  PROM,  1:  RAM 
Microprocessor  program  mode 
0:  Flight,  1:  Test 
5:  program  stored  in  PROM 
6:  modified  output  format 
Vip  Setting 
Vbias  setting 

Source  of  raw  telemetry  data 
1:  IES,  2:  IES2, 

3:  IES2A,  4:  IES3 
Running  cycle  counter  (1-1024) 

Spare  locations 
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Table  8  Common  Format  data  words  (Cycle  2) 


CYCLE  2 


Acronym 

Word 

Cycle  ID 

1 

Configuration  ID 

2 

DSM  Command  Monitor 

3 

N(H+) 

4 

N  (0+) 

5 

N  (E) 

6 

MEP  Temp  2 

7 

DM  Temp 

8 

V(ap)  Monitor 

9 

Vbias  +  Vip  Monitor 

10 

RPA  Monitor 

11 

DMLLB 

12 

VP-RPA 

13 

Vsp 

14 

DM  Signal  level 

15 

SM  Range  (WIBAN1) 

16 

DM  Range  (WIBAN2) 

17 

Subcom  1 

18 

Subcom  2 

19 

DSM  Sensor  Temp 

20 

EP  Temperature 

21 

SM  data 

22-45 

DM  Data 

46  -  57 

RPA  Current  Data 

58-93 

EP  Current  Data 

94  -  117 

SM  Filter 

118  -  126 

DM  Filter  (FIBA) 

127  -  132 

EP  Sweep  Monitor 

133  -  138 

RPA  Sweep  Monitor 

139  -  144 

Cycle  1  MSB 

145 

EP  Mode 

146 

EP  /  RPA  Flag 

147 

Checksum  Error  Flag 

148 

Uplink  Flag 

149 

Unused  (NULL) 

150 

Vbias/Senpot  Flag 

151 

RAM  Error  Flag 

152 

Dump  Flag 

153 

Serial  Number 

154 

Vip  Monitor 

155 

Vbias  Monitor 

156 

Instrument  Code 

157 

Cycle  Count 

158 

Unused  (NULL) 

158 

Description 

Cycle  identifier 

Configuration  bits 

Last  command  sent  from  DSM 

H+  Density  calculated  by  microprocessor 

0+  Density  calculated  by  microprocessor 

Electron  Density  calculated  by  microprocessor 

Temperature  at  MEP  ADC 

DM  Electronics  Temperature 

Measured  voltage  on  Ion  Array 

Setting  levels  for  V(BIAS)  +  VIP 

Flags  from  microprocessor  EP  analysis 

Output  of  Drift  Meter  log  amplifier  B 

Vehicle  potential  from  calculation  of  RPA  data 

Calculated  down-range  relative  Ion  plasma  velocity 

Drift  meter  zero  level 

SM  Electrometer/Amplifier  range  setting  indicator 

Drift  meter  range  indicator 

DSM  Multiplex  data  1 

DSM  Multiplex  data  2 

Temperature  from  DSM  sensor 

Temperature  from  Thermistor  on  EP  pre-amp  housing 

Total  Ion  Trap  (SM)  Electrometer/Amplifier  output 

Drift  Meter  offset  output 

Ion  RPA  log  amplifier  output  of  current  to  collector 
Electron  Probe  log  amplifier  output  of  current  to  collector 
Output  from  filters  connected  to  SM  Collector 
Output  from  filters  connected  to  DM  Collector 
Voltage  applied  to  Electron  retarding  grid 
Voltage  applied  to  Ion  RPA  retarding  grid 
Most  Significant  Bit  of  Cycle  ID 

Electron  Probe  operation  mode  indicator  (0  -  6  =  A  -  E) 

Indicates  whether  EP,  RPA,  or  both  types  are  in  telemetry 

0:  None,  1:  ERROR 

1:  program  has  stopped  to  receive  uplink 

Spare  location 

0:  Vbias  Mode 

1:  Senpot  Mode 

1 :  RAM  Error  has  occurred 

1:  Program  is  dumping  RAM 

SSIES  serial  number 

Vip  Setting 

Vbias  setting 

Source  of  raw  telemetry  data 
1:  IES,  2:  IES2, 

3:  IES2A,  4:  IES3 
Running  cycle  counter  (1-1024) 

Spare  locations 
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33.2.3  File  IESEDRFILE. 


a.  Contents: 

This  file  contains  the  Environmental  Data  Records  generated  by  the  APGA  program,  and  also 
includes  processing  status  flags  used  by  the  APGA  program. 

b.  Size: 

The  size  of  this  file  is  determined  by  the  time  span  of  the  data  which  comprise  the  file.  This  can  be 
calculated  from: 

wEDR  =  [NMin  /  3]  x  RSize 

where:  wEDR  is  the  number  of  words  of  data  in  the  file, 

NMin  is  the  number  of  minutes  of  data, 

RSize  is  the  record  size  (1791  words). 

c.  Format: 

Binaiy  direct  access 

I/O  record  size  -  fixed  length,  1791  words 
Data  record  size  -  595  words 

d.  Structure: 

The  file  consists  of  a  header  record,  unnecessary  for  AFSFC  purposes,  but  containing  data  required  by 
the  Sperry  database  system,  and  a  series  of  physical  data  records.  Each  physical  data  record  consists  of 
a  (now  obsolete)  6  word  status  flag  block  and  three  595  word  logical  data  records.  Each  logical  data 
record  constitutes  one  minute’s  worth  of  data. 


word# 

contents 

1 

Mission  ID  (4-digit  integer) 

2 

Date  of  oldest  data  in  file  (YYMMDD,  integer) 

3 

Time  of  oldest  data  in  file  (HHMMSS,  integer) 

4 

Time  of  oldest  data  (IES  minutes,  integer) 

5 

Record  number  of  oldest  data  in  file  (integer)(relative  to  header  block) 

6 

Date  of  latest  data  in  file  (YYMMDD,  integer) 

7 

Time  of  latest  data  in  file  (HHMMSS,  integer) 

8 

Time  of  latest  data  (IES  minutes,  integer) 

9 

Record  number  of  latest  data  in  file  (integer)(relative  to  header  block) 

10 

Current  track  size  of  IESEDRFILE  (integer) 

11 

Number  of  active  satellites  (integer) 

12-1611 

Processing  status  flags  (two  per  EDR  I/O  block) 

1612-1791 

[  Zero  fill  ] 

Figure  23a  Structure  and  contents  of  header  blocks  in  file  IESEDRFILE 


Figure  23a  shows  the  structure  of  the  header  block.  Note  that  most  of  the  information  is  useless  for 
AFSFC  processing,  but  is  filled  with  innocuous  values  by  the  APGA  program  for  processing.  The 
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entire  EDR  I/O  processing  should  be  simplified  to  eliminate  the  obsolete  complications  imposed  upon 
it  by  the  AFGWC  Sperry  database  system. 

Figure  23b  shows  the  structure  of  an  I/O  record.  The  first  six  words  in  each  I/O  record  were 
processing  status  flags  used  by  the  Sperry  database  system,  but  useless  in  the  AFSFC  scheme.  The 
APGA  program  fills  these  locations  with  innocuous  values  for  processing.  The  internal  structure  of  an 
EDR  is  illustrated  in  Volume  2,  Programmer’s  Guide,  Appendix  8.6. 


word# 

contents 

1-6 

Processing  status  flags  (two  per  EDR  in  block) 

7-601 

EDR  #1 

602-1196 

EDR  #2 

1197-1791 

EDR  #3 

Figure  23b  Structure  of  I/O  records  in  file  IESEDRFILE 


3.3.2.4  File  IESSTATFILE. 

a.  Contents: 

This  file  contains  data  processing  statistics  from  an  APGA  program  run.  Included  are  readout- 
averaged  values  for  various  geophysical  parameters  and  instrument  temperatures,  processing  statistics 
for  RPA  and  EP  sweep  analyses  and  CkL  calculations,  and  error/status  flags  for  each  processing 
module. 

b.  Size: 

The  file  size  is  833  words,  which  provides  room  for  statistics  from  18  readout  REVs.  This  is  a 
holdover  from  AFGWC  Sperry  processing.  This  file  is  now  initialized  at  the  start  of  each  APGA 
program  execution,  and  will  contain  information  only  for  the  satellite  and  rev  of  the  current  run.  The 
input  and  output  processing  for  this  file  could  be  greatly  simplified  or  possibly  eliminated  for  AFSFC 
purposes. 

c.  Format: 

Binary  direct  access 

I/O  record  size  =  833  words 

Data  record  size  =  46  words 

d.  Structure. 

Each  file  is  an  single  I/O  record  (833  words)  which  contains  a  4  word  header  and  a  46  word  data 
record.  Figure  24  shows  the  structure  and  contents  of  a  data  record. 

3.3.2.5  File  IESAGDBXFR1  (and  IESAGDBXFR2). 
a.  Contents: 

These  files,  generated  by  the  APGA  program,  contain  one  minute  summary  records  created  from 
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entries  are 


ed  otherwise) 


Mission  ID 
Satellite  flight  ID 

Time  file  last  displayed  (IES  minute) 
Time  file  last  updated  (IES  minute) 


5 

Readout  REV  number 

6 

Readout  REV  start  date  (DD) 

7 

Readout  REV  start  time  (HHMM) 

8 

Average  EP  Ne  (el/cm-*) 

9 

Ne  analysis  source 

1  -  Ground  analysis 

2  -  On-board  microprocessor 

10 

EP  sensor  mode  (  0-6  :  A-E  ) 

11 

Average  RPA  Nj  (ion/cm^) 

12 

Nj  analysis  source 

1  -  Ground  analysis 

2  -  On-board  microprocessor 

13 

Average  DM  Nj  (ion/cm^) 

14 

Average  SM  Nj  (ion/cm^) 

15 

Average  EP  Te  (°K) 

16 

Average  RPA  Tj  (°K) 

17 

Average  of  first  SM  filter  PDS  (REAL) 

18 

Average  C^L  (REAL) 

19 

CjjL  data  source 

1  -  SM  density  data  only 

2  -  SM  density  and  filter  data 

3  -  EP  DC  mode  density  data  only 

20  Average  horizontal  cross-track  ion  drift  velocity  (m/s) 

21  Average  vertical  ion  drift  velocity  (m/s) 

22  Average  horizontal  ram  drift  velocity  (m/s) 

23  Average  Vjp(volts)  (REAL) 

24  Average  VhjaS(volts)  (REAL) 

25  VbjaJ?ource 

1  -  On-board  microprocessor  analyses 

2  -  SENPOT  sensor 

26  VEP(volts)  (REAL) 

27  Average  electrometer  instrument  temperature  (°C) 

28  Average  ADC  temperature  (°C) 

29  Average  DSM  instrument  temperature  (°C) 

30  Average  DM  offset  voltage  (volts)  (REAL) 

31  Number  of  successful  EP  sweep  analyses 

32  Number  of  EP  sweeps  attempted 

33  Number  of  successful  RPA  sweep  analyses 

34  Number  of  RPA  sweeps  attempted 

35  Number  of  successful  C^L  calculations 

36  Number  of  C^L  calculations  attempted 

37  EP  status/error  flag 

38  RPA  status/error  flag 

39  DM  status/error  flag 

40  SM  status/error  flag 

41  MP  status/error  flag 

42  C^L  status/error  flag 

43  Duplicate  data  frame  count 

44  Average  difference,  SM  to  DM  density 

45  Average  difference,  SM  to  EP  density 

46  Average  difference,  SM  to  RPA  density 

47  Average  difference,  DM  to  EP  density 

48  Average  difference,  DM  to  RPA  density 

49  Average  difference,  EP  to  RPA  density 

50  Number  of  Te  <  Tj  points 


Figure  24  Structure  and  contents  of  file  IESSTATFILE 
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EDRs.  They  are  a  remnant  of  AFGWC  Sperry  processing  and  are  probably  not  necessary  for  AFSFC 
purposes.  File  IESAGDBXFR2  has  been  disabled  to  somewhat  simplify  processing  for  AFSFC. 

b.  Size: 

The  file  contains  a  header  and  a  variable  number  data  records. 

c.  Format: 

Binary  direct  access 

I/O  record  size  -  1791  words 

Data  record  size  -  22  words 

d.  Structure: 

The  first  I/O  record  contains  a  22-word  header  block  and  80  data  records.  Each  subsequent  I/O  record 
contains  81  data  records.  The  records  are  output  to  the  file  in  the  order  the  data  were  processed  by 
the  APGA  program.  Figure  25a  shows  the  structure  of  these  files,  and  Figure  25b  shows  the  structure 
and  contents  of  a  data  record. 

3.3.2.6  File  IESCNTRLFILE. 

a.  Contents: 

This  file  contains  program  control  information,  SSIES  sensor  constants,  and  algorithm  control 
parameters  used  by  program  APGA.  The  file  is  loaded  by  program  LDCON02.  (Note:  A  detailed 
description  of  the  various  parameters  in  this  file  can  be  found  in  Volume  2,  Programmer’s  Guide, 
Appendix  8.4) 

b.  Size: 

The  file  size  is  1095  words. 

c.  Format: 

Binary  direct  access 

I/O  record  size  =  1095  words 

d.  Structure. 

The  file  is  divided  into  a  header  section  and  up  to  three  control  information  sections,  one  per  active 
satellite. 


3.3.2. 7  File  IESAPEXTABLE. 
a.  Contents: 

This  file  contains  information  required  to  convert  geographic  latitude  and  longitude  to  modified  Apex 
latitude  and  longitude.  (Note:  The  conversion  is  valid  for  an  altitude  of  840  kilometers.) 
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a.  I/O  Record  #1. 


word#  contents 

1-22  Header  information 

1  -  File  lock  word  (99  for  lock) 

2  -  Date  file  built  by  APGA  program  (YYMMDD) 

3  -  Time  file  built  by  APGA  program  (HHMMSS) 

4  -  Number  of  satellites  in  file  (1-8) 

5  -  Number  of  records  in  file  (total) 

6  -  Satellite  1  flight  ID 

7  -  Number  of  records  for  satellite  1 

8  -  Satellite  2  flight  ID 

9  -  Number  of  records  for  satellite  2 


23-44 

20  -  Satellite  8  flight  ID 

21  -  Number  of  records  for  satellite  8 

22  -  [  Zero  fill  ] 

Data  record  #1  (for  one  minute  of  data) 

45-66 

Data  record  #2 

1760-1782 

Data  record  #80 

1783-1791 

[  Zero  fill  ] 

b.  I/O  Record  #2-N 

word# 

contents 

1-22 

Data  record  #1 

23-44 

Data  record  #2 

1760-1782 

Data  record  #81 

1783-1791 

[Zero  fill] 

Figure  25a  Structure  of  files  IESAGDBXFR1  (and  IESAGDBXFR2) 
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word# 

contents 

1 

Date  (YYMMDD,  integer) 

2 

Time  (HHMM,  integer) 

3 

Data  used  in  CkL  calculation 

1  -  SM  density  data  only 

2  -  SM  density  and  filter  data 

3  -  EP  DC  mode  density  data  only 

4 

Geographic  latitude  (degrees,  north) 

5 

Geographic  longitude  (degrees,  east) 

6 

Electron/ion  density  (part/cm3) 

7 

Electron/ion  density  source  (integer) 

1  -  SM  (ion  density) 

2  -  DM  (ion  density) 

3  -  EP  (DC  modes)  (electron  density) 

4  -  EP  (sweeps)  (electron  density) 

5  -  RPA  (ion  density) 

8 

Ion  constituent  ratio,  N[H+]/N[0+] 

9 

Electron  temperature  (°K) 

10 

Ion  temperature  (°K) 

11 

CkL  for  first  10-second  period  (hhmm00-hhmm09) 
>0:  CkL  value 

-1:  No  CkL  calculation  possible 
-2:  (RMS  AN)/N  below  threshold 

12 

p,  for  first  10-second  period 

<0:  Calculation  was  from  256-point  data  set 
>0:  Calculation  was  from  512-point  data  set 

13 

CkL  for  second  10-second  period  (hhmml0-hhmml9) 

14 

pt  for  second  10-second  period 

21 

CkL  for  sixth  10-second  period  (hhmm50-hhmm59) 

22 

P!  for  sixth  10-second  period 

Figure  25b  Structure  and  contents  of  data  records  from  files  IESAGDBXFR1  (and  IESAGDBXFR2) 
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b.  Size: 


The  file  size  is  8203  words. 

c.  Format: 

Binary  direct  access 

I/O  record  size  =  8203  words 

d.  Structure: 


The  structure  and  contents  of  this  file  are  shown  in  Figure  26. 

a.  File  structure. 

word#  contents 

1  Valid  altitude  for  coordinate  system  (km) 

2-4  Geocentric  Cartesian  coordinates  of  the  center  of  the  offset-dipole  coordinate 

system  in  which  the  Apex  look-up  table  is  defined. 

5-13  Rotation  matrix  for  conversion  between  geographic  and  offset-dipole  coordinate 

systems,  U(3,3). 

14-8203  Offset-dipole-to-Apex  coordinate  transformation  look-up  table, 

APXTAB(2,45,91). 

b.  Look-up  table  structure. 

The  first  index  in  the  look-up  table  array,  APXTAB(I,J,K),  indicates  whether  Apex  latitude  (1=1)  or 
longitude  (1=2)  is  being  accessed.  The  second  index  is  the  longitude  index,  which  is  calculated  from: 

J  =  (offset-dipole  east  longitude)/8  +  1. 

The  third  index  is  the  latitude  index,  which  is  calculated  from: 

K  =  (offset-dipole  latitude)/2  +  46. 

For  example,  the  Apex  latitude  for  offset-dipole  latitude  68°  south,  longitude  24°  west  (336°  east) 
would  be  located  in  APXTAB(1,43,12). 

Figure  26  IESAPEXTABLE  structure  and  contents 
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SECTION  4.  PROGRAM  MAINTENANCE  PROCEDURES 


4.1  Conventions. 

4.1.1  COMMON  Block  Names, 
a.  xxxCON 

COMMON  blocks  of  this  form  contain  the  processor  control  information  and  sensor  constants  for  the 
various  instruments.  The  data  which  reside  in  these  COMMON  blocks  are  read  from  the 
IESCNTRLFILE  and  stored  into  the  COMMON  blocks  during  program  initialization.  See 
Subroutines  INIT  (2.4.2)  and  VEHPAR  (2.4.2.4)  for  specifics.  The  xxx  indicates  the  instrument  or 
processor  with  a  two  or  three  letter  mnemonic: 


PRO 

-  Processing  Control 

RPA 

-  Retarding  Potential  Analyzer 

EP 

-  Electron  Probe 

SM 

-  Scintillation  Monitor 

DM 

-  Drift  Meter 

CKL 

-  CkL  Processor 

DF 

-  Data  Frame  Decode  Processor 

MP 

-  Onboard  Microprocessor 

xxx  AN  L 

COMMON  blocks  of  this  form  contain  the  results  of  the  analysis  for  each  of  the  various  sensors.  The 
xxx  will  indicate  the  instrument  or  processor  as  in  4.1.1a  above. 

4.1.2  Variable  Names. 

To  prevent  naming  conflict  and  to  simplify  identification  of  the  data  and  processors  involved  in  any 
segment  of  code,  most  important  variables  are  named  according  to  the  various  instruments. 


Instrument 

REAL  variable 

INTEGER  variable 

RPA 

RPxxxx 

IRPxxx 

EP 

EPxxxx 

IEPxxx 

SM 

SMxxxx 

ISMxxx 

DM 

DMxxxx 

IDMxxx 

MP 

xxxxMP 

MPxxxx 

4.1.3  Coordinate  Systems. 

4.1.3.1  Geocentric  Coordinate  Systems. 

The  APGA  program  employs  three  geocentric  spherical  (latitude,  longitude)  coordinate  systems: 
geographic,  offset-dipole,  and  modified  Apex.  These  systems  are  defined  as  follows: 
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a.  Geographic  latitude/longitude. 

The  geographic  system  is  the  standard  latitude/longitude  system  with  north  latitudes  positive  and 
east  longitudes  positive. 

b.  Offset-dipole  latitude/longitude. 

Offset-dipole  coordinates  are  defined  by  a  dipole  which  has  been  tilted  and  offset  so  that  the  poles 
of  the  dipole  are  co-located  with  the  poles  of  the  modified  Apex  system  (see  reference  1.2.3o). 

This  coordinate  system  is  used  solely  in  the  conversion  from  geographic  coordinates  to  modified 
Apex  coordinates.  The  transformation  from  geographic  to  offset-dipole  coordinates  is  done  in 
four  steps: 

1.  Convert  the  geographic  latitude  and  longitude  to  a  geocentric  Cartesian  coordinate  system  for 
an  altitude  of  840  km. 

2.  Apply  a  pre-defined  rotation  matrix  to  the  Cartesian  coordinates  to  rotate  and  tilt  the  axes  of 
the  coordinate  system. 

3.  Subtract  offset  values  from  the  Cartesian  coordinates  to  move  the  center  of  the  coordinate 
system. 

4.  The  rotated/offset  Cartesian  coordinates  are  then  converted  back  to  a  spherical  system  to 
provide  offset-dipole  latitude  and  longitude. 

This  transformation  is  made  using  the  rotation  matrix  and  offset  definitions  for  the  offset-dipole 
system  stored  in  file  IESAPEXTABLE.  This  algorithm  is  implemented  in  Subroutine  OFFSET 
(see  2.4.3.2.2). 

c.  Modified  Apex  latitude/longitude. 

Modified  Apex  coordinates  are  a  geomagnetic  latitude/longitude  system  based  on  a  "real-field" 
model  of  the  earth’s  magnetic  field.  A  description  of  Apex  coordinates  can  be  found  in  reference 
1.2.3u,  a  copy  of  which  is  in  the  SSIES  Project  Workbook.  Briefly,  Apex  coordinates  are  nearly 
identical  to  invariant  and  corrected  geomagnetic  coordinates  at  high  latitudes  and  are  nearly 
identical  to  dip  latitude  at  low  latitudes.  The  Apex  coordinates  used  in  this  application  are 
"modified"  in  that  they  have  been  adjusted  so  that  the  latitudes  produced  by  the  coordinate 
transformation  pass  through  0°  at  the  magnetic  (dip)  equator,  rather  than  discontinuously  jumping 
from  a  minimum  positive  latitude  to  the  corresponding  negative  latitude  at  the  equator.  This 
modification  is  described  in  more  detail  in  reference  1.2.3o.  For  the  sake  of  brevity,  modified 
Apex  latitude  and  longitude  are  denoted  simply  Apex  latitude  and  longitude  in  this  document.  As 
with  the  offset-dipole  coordinate  system,  Apex  coordinates  are  a  function  of  the  altitude  above  the 
earth’s  surface. 

The  transformation  from  geographic  to  Apex  coordinates  is  done  in  two  steps.  First,  the 
geographic  latitude  and  longitude  are  converted  to  offset-dipole  coordinates.  Apex  coordinates  are 
derived  from  the  offset-dipole  coordinates  by  quadratic  interpolation  in  a  large  look-up  table,  also 
stored  in  file  IESAPEXTABLE.  This  table  consists  of  the  Apex  latitude  and  longitude  for  every 
point  on  an  8°  latitude  by  15°  longitude  offset-dipole  grid.  This  algorithm  is  implemented  in 
Subroutines  APXTAB  (see  2.4.3.2.1)  and  INTERP  (see  2.4.3.23).  This  table  was  generated  using 
software  described  in  reference  1.2.3o  and  was  generated  using  the  IGRF  1990  standard 
geomagnetic  field  model  initialized  to  epoch  1990.  Both  offset-dipole  and  Apex  coordinates  were 
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calculated  for  an  altitude  of  840  km.  Both  geomagnetic  systems  are  oriented  in  the  same  sense  as 
the  geographic  system,  i.e.,  north  latitudes  and  east  longitudes  are  positive. 

4.1.3.2  Spacecraft-Centered  Coordinate  Systems. 

The  APGA  program  employs  four  spacecraft  centered  Cartesian  coordinate  systems:  spacecraft 
coordinates  (x,,  ys,  zs),  geographic  meridian  coordinates  (xg,  yg,  zj,  geomagnetic  meridian  coordinates 
(x,,,  ym,  zj,  and  irregularity  coordinates  (xi(  yh  z).  These  systems  are  defined  as  follows: 

a.  Spacecraft  coordinates. 

This  coordinate  system  is  tied  to  the  orbital  orientation  of  the  spacecraft  with  +ys  in  the  direction 
of  travel  along  the  orbit,  -t-x,  in  the  nadir  direction,  and  +zs  in  the  direction  of  the  solar  panel. 
This  is  the  same  system  used  in  other  DMSP  documentation.  The  drift  velocity  observations 
reported  from  the  DM  and  RPA  sensors  are  defined  in  this  system  so  that  the  total  ion  drift 
velocity  with  respect  to  the  spacecraft  is  given  by 

U  =  Uv  xs  +  uz  ya  +  uh  z8 

b.  Geographic-meridian  coordinates. 

This  coordinate  system  is  tied  to  the  orientation  of  the  spacecraft  in  the  geocentric  geographic 
system  with  +xg  in  the  plane  of  the  local  geographic  meridian  perpendicular  to  the  local  nadir 
direction  in  the  local  north  direction,  +yg  in  the  local  east  direction  also  perpendicular  to  the  local 
nadir  direction,  and  +zg  in  the  direction  of  the  local  nadir.  (Note  that  +zg  is  in  the  same 
direction  as  +xs.)  The  transformation  from  spacecraft  coordinates  to  geographic  meridian 
coordinates  is  given  by: 


0 

COS 

a 

-sin  a 

y* 

= 

0 

sin 

a 

cos  a 

Z9 

1 

0 

0 

where  a  is  the  rotation  angle  between  the  direction  of  orbital  motion  and  the  geographic  meridian 
given  by: 


since 


cos  i 
cos  \g 


and  i  is  the  orbital  inclination  angle, 

A.g  is  the  local  geographic  latitude. 

This  transformation  is  implemented  in  Subroutine  CTRANS  (see  2.4.4.6.16).  (Note:  The 
transformation  from  geographic  meridian  coordinates  to  spacecraft  coordinates  can  be  calculated 
using  the  inverse  of  the  above  matrix  equation.) 

c.  Geomagnetic  meridian  coordinates. 

This  coordinate  system  is  similar  to  the  geographic  meridian  coordinate  system,  except  that  +xm 
and  +ym  are  oriented  with  respect  to  the  local  geomagnetic  meridian  (as  specified  by  the  local 
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magnetic  declination  angle)  in  the  magnetic  north  and  east  direction,  respectively.  The  +zm 
coordinate  is  in  the  same  direction  as  +zg.  The  transformation  from  geographic  meridian  to 
geomagnetic  meridian  coordinates  is  given  by: 


COS 

P 

-sin  p 

0 

*<7 
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P 
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^<7 

0 

0 
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z<7 

where:  p  is  the  local  magnetic  declination  angle. 

This  transformation  is  made  in  Subroutine  CVEFF  (see  2.4.4.6.15).  (Note:  As  with  the  previous 
transformation,  the  reverse  transformation  can  be  calculated  from  the  inverse  of  the  forward 
transformation  matrix.) 

d.  Irregularity  coordinates. 

This  coordinate  system  is  aligned  with  the  coordinate  system  used  to  define  small-scale 
irregularities  in  the  ionospheric  plasma.  In  practice,  this  system  is  aligned  with  the  geomagnetic- 
meridian  system  described  above,  although  in  theory  it  may  not  be  if  the  irregularities  are  not 
aligned  with  the  local  geomagnetic  field  direction.  The  scaling  of  this  coordinate  system  is  defined 
by  the  axial  ratios  of  the  irregularities,  parameters  a  and  b,  which  are  provided  from  a  sub-set  of 
the  ionospheric  irregularity  model  from  the  WBMOD  scintillation  program  (see  reference  1.2.3q). 
A  description  of  this  coordinate  system  and  the  transformation  equations  (used  in  calculating  the 
effective  satellite  velocity)  can  be  found  in  reference  1.2.3v,  a  copy  of  which  can  be  found  in  the 
SSIES  Project  Workbook  (see  the  CkL  section). 

These  coordinate  systems  are  used  explicitly  only  in  the  CkL  calculation  in  which  the  velocity  of  the 
spacecraft  with  respect  to  the  small  scale  irregularities  in  the  irregularity  coordinate  system  is  needed 
to  calculate  Q  from  the  spectral  parameters  T  and  p.  The  use  of  spacecraft  coordinates  is  implicit  in 
the  two  orientation  and  sign  parameters  stored  in  file  IESCNTRLFILE  which  are  used  to  calculate  ub 
and  it,  from  the  DM  offset  voltages  (see  2.4.4.4  and  Appendix  B.3). 

4. 1.3.3  Time  Systems. 

The  APGA  program  employs  four  time  systems:  spacecraft  time,  Greenwich  Mean  Time  (GMT  or 
UT),  IES  minutes  (database  time),  and  Apex  (geomagnetic)  local  time.  These  systems  are  defined  as 
follows: 


a.  Spacecraft  time. 

This  time  is  obtained  from  the  data  frame  records  input  from  file  IESPREPFILE.  It  is  nominally 
the  number  of  seconds  from  the  previous  GMT  midnight,  although  the  clock  is  occasionally  not 
reset  exactly  at  midnight  so  it  can  be  greater  than  86,400.  The  program  uses  this  time  for  all  data- 
frame  related  operations. 

b.  GMT. 

This  time  is  calculated  from  the  spacecraft  time.  Corrections  are  made  for  the  midnight  reset 
problem,  and  the  seconds  since  midnight  are  converted  to  integer  HHMMSS  where  HH  is  the 
hour,  MM  is  the  minute,  and  SS  is  the  second.  GMT  is  used  only  for  output  purposes. 
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c.  IES  minutes. 

This  time  system  is  used  for  management  of  the  APGA  database  files.  It  is  defined  as  the  number 
of  minutes  since  1  January  1985  (an  arbitrary  selection)  and  as  such  is  similar  in  concept  to  the 
AFGWC  Julian  hours.  It  provides  a  "linear”  time  coordinate  which  mitigates  the  problems 
associated  with  the  ends  of  days,  months,  and  years  and  other  calendar-related  oddities  such  as 
leap  years.  The  conversion  between  GMT  and  IES  minutes  is  implemented  in  Subroutine 
TIMCON  (see  2.4.8.12). 

d.  Apex  local  time. 

This  time  system  is  the  local  time  associated  with  the  Apex  coordinate  system.  It  is  calculated  in  a 
similar  manner  to  local  (mean)  solar  time  in  that  it  is  defined  in  terms  of  the  difference  between 
the  local  longitude  and  the  longitude  of  the  mean  sun.  This  is  done  by  calculating  the  Apex 
longitude  of  the  mean  anti-solar  point  (i.e.,  the  Apex  longitude  of  the  point  on  the  geographic 
equator  at  a  longitude  180°  from  the  location  of  the  sun  specified  by  the  current  GMT),  and 
dividing  the  difference  between  the  local  Apex  longitude  and  the  longitude  of  the  mean  anti-solar 
point  by  15°.  This  provides  the  Apex  local  time  in  decimal  hours.  This  time  is  used  both  for 
output  (in  EDRs)  and  in  calculating  ionospheric  model  parameters  used  in  the  QL  calculation. 

4.1.4  Data  Flow  Control  Flags 

There  are  five  data  flow  control  flags  set  by  the  data  input  routines  which  control  the  processing  of 
data  by  the  APGA  program.  These  control  flags  indicate  the  following: 

a.  NEWSAT. 

This  flag  is  always  set  to  .TRUE,  for  the  first  data  frame  processed  in  any  program  run.  It  will 
subsequently  be  set  to  .TRUE.,  when  input  processing  encounters  data  from  a  different  satellite 
than  the  last  data  frame  processed  in  the  current  program  run,  and  will  cause  the  APGA  program 
to  terminate.  This  flag  resides  in  COMMON  block  PROCON. 

b.  NEWREV. 

This  flag  is  always  set  to  .TRUE,  for  the  first  data  frame  processed  in  any  program  run.  It  will 
subsequently  be  set  to  .TRUE.,  when  input  processing  encounters  data  from  a  different  readout 
REV  than  the  last  data  frame  processed  in  the  current  program  run,  and  will  cause  the  APGA 
program  to  terminate.  This  flag  resides  in  COMMON  block  PROCON. 

c.  GRESET. 

When  this  flag  is  set  to  .TRUE.,  it  indicates  that  there  has  been  an  acceptable  time  jump  between 
the  current  data  frame  and  the  last  data  frame  processed.  This  allows  the  various  modules  to  reset 
themselves  for  a  time  jump  without  a  full  reinitialization.  This  flag  resides  in  COMMON  block 
PROCON. 

d.  THEEND. 

When  this  flag  is  set  to  .TRUE.,  it  indicates  that  the  current  data  frame  is  the  end  of  data  for  the 
current  run  of  the  APGA  program. 
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e.  IQFRAME. 


This  variable,  set  in  Subroutine  CHEKIT  (see  2.43.3),  indicates  the  state  of  the  data  in  the 
current  frame.  The  settings  are  as  follows: 

-2:  -  Do  not  process  /  Data  frame  time  discontinuity. 

-1:  -  Do  not  process  /  Duplicate  frame. 

0:  -  Do  not  process  /  Frame  data  not  valid. 

+  1:  -  Process  /  Frame  data  is  valid. 

4.2  Verification  Procedures. 

Changes  to  the  APGA  program  should  be  verified  via  regression  testing  against  the  established 
baseline  code  and  data  set.  If  the  modifications  of  the  APGA  program  are  such  that  the  output 
should  not  change,  then  the  results  of  the  regression  test  should  be  identical  to  those  obtained  from 
the  baseline  run(s).  If  the  modifications  will  change  the  output,  the  results  of  the  regression  test 
should  be  identical  for  those  sections  of  the  program  not  changed. 

4.3  Error  Conditions. 

The  various  error  conditions  which  programs  APGA,  BNBA,  and  LDCON02  may  encounter  are 
described  in  detail  in  Volume  2,  Programmer’s  Guide  (see  Sections  3.4.2,  4.4.2,  and  4.5). 

4.4  Special  Maintenance  Procedures. 

4.4.1  Program  Compilation  and  Collection. 

The  programs  which  make  up  the  SSIES  processing  system  are  compiled  using  VAX  DCL  commands 
as  follows: 

a.  Program  APGA. 

$  FOR/LIST/SHO= (INCLUDE, NOMAP)  APGA.FOR 
$  LINK  APGA.OBJ 
$  DELETE/NOCONFIRM  APGA.  OBJ 

b.  Program  BNBA 

To  configure  BNBA  for  SSIES-2,  use  the  following  logical  assignment: 

$  DEFINE/USER  SENSNAM  SENSNAM_2.INC 

To  configure  BNBA  for  SSIES-2A,  use  the  following  alternative  logical  assignment: 

$  DEFINE/USER  SENSNAM  SENSNAM_2A.INC 

$  FOR/LIST/SHO= (INCLUDE, NOMAP)  BNBA.FOR 
$  LINK  BNBA.OBJ 
$  DELETE/NOCONFIRM  BNBA.OBJ 

c.  Program  LDCON02. 

$  FOR/LIST/SHO= (INCLUDE, NOMAP)  LDCON02.FOR 
$  LINK  LDCON02.OBJ 
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S  DELETE/NOCONFIRM  LDCON02.OBJ 

4.4.2  Modification  of  Parameters  in  IESCNTRLFILE. 

The  various  control  parameters  in  file  IESCNTRLFILE  are  set  via  program  LDCON02.  Detailed 
instructions  for  the  use  of  this  program  are  given  in  Section  8.4  of  Volume  2,  Programmer’s  Guide. 

4.4.3  Limiting  Amount  of  Data  Processed. 

The  amount  of  data  processed  by  the  APGA  program  can  be  constrained  by  setting  up  a  file 
containing  the  data  (day-of-year)  and  time  (seconds  since  midnight)  at  which  to  start  processing  and 
the  number  of  seconds  of  data  to  process.  This  file,  named  IESPROLIMITS,  should  be  an  ASCII 
formatted  data  file  containing  one  line  of  data  with  the  above  information  in  the  order  stated.  If  the 
APGA  program  cannot  locate  this  file  (as  is  the  case  in  a  normal  production  run)  or  encounters  an 
error  in  reading  from  the  file,  all  data  in  file  IESPREPFILE  will  be  processed.  If  the  file  is 
successfully  read,  the  APGA  program  will  process  no  data  input  from  file  IESPREPFILE  until  a  one- 
minute  data  block  is  input  in  which  the  time  of  the  latest  data  in  the  block  is  later  than  the  input  start 
time.  Data  will  then  be  processed  normally  until  at  least  the  input  number  of  seconds  of  data  have 
been  processed. 

This  limiting  process  is  implemented  in  Subroutines  INIT,  which  inputs  the  limit  information  from  file 
IESPROLIMITS,  and  RDPREP,  which  identifies  which  data  blocks  to  process. 

4.4.4  Program  APGA  Diagnostic  Output. 

a.  Input  Data  Diagnostics 

The  shell  diagnostic  switch  in  file  IESCNTRLFILE  controls  the  diagnostic  print  for  the  input  and 
decode  routines.  There  are  four  levels  of  print.  This  diagnostic  switch  should  not  be  turned  on 
during  production  runs.  At  level  4,  it  will  generate  nearly  one  full  page  of  print  for  each  second 
of  data  processed.  Figure  27  is  sample  of  the  level  1  diagnostics. 

Level  1  -  Subroutine  call  trace  with  frame  time  and  I/O  record  number. 

Level  2  -  Level  1  plus  action  control  flags  and  decode  flags  (NEWSAT,  NEWREV,..., 
IQFRME,...). 

Level  4  -  Level  2  plus  a  formatted  print  of  the  unpacked  and  decoded  OLS  data  frame 
contents. 

b.  Processing  Status  Diagnostics. 

If  the  QC  module  diagnostic  print  flag  in  file  IESCNTRLFILE  is  set  to  a  non-zero  value,  a  series 
of  status  diagnostics  will  be  printed  in  the  standard  print  file.  A  list  of  these  diagnostics  is  given 
in  Section  4.4.2.2  of  Volume  2,  Programmer’s  Guide. 

c.  EP,  RPA,  DM,  SM,  and  CKL  modules. 

These  modules  of  the  APGA  program  can  be  directed  to  generate  extensive  diagnostic  output 
files.  These  are  controlled  via  the  diagnostic  output  flags  loaded  in  file  IESCNTRLFILE  by 
program  LDCON02  (see  Section  8.4  of  Volume  2,  Programmer’s  Guide).  In  order  to  be  built, 
however,  these  files  must  be  assigned  to  the  run  prior  to  the  execution  of  the  APGA  program.  If 
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they  cannot  be  opened  by  the  program  (in  Subroutine  OPNDOF),  the  diagnostic  output  will  not 
be  generated.  (Note:  This  is  done  in  order  to  prevent  the  generation  of  these  files  in  a  normal 
production  run.)  Figure  28  shows  examples  of  the  diagnostic  output  written  to  the  ASCII  format 
output  files  (IESEPPRT,  IESRPAPRT,  IESDMPRT,  IESSMPRT,  and  IESCKLPRT),  and  Figure 
29  shows  the  format  of  the  output  to  the  binary  output  files  (IESEPDIAG,  IESRPADIAG, 
IESDMDIAG,  IESSMDIAG,  and  IESCKLDIAG).  If  the  diagnostic  print  flags  are  negative,  any 
requested  ASCII  format  output  will  be  printed  to  the  standard  print  file  as  it  is  generated. 

d.  EDR  ASCII  output. 

Figure  30  shows  an  example  of  an  EDR  ASCII  output.  These  will  be  written  to  file  IESEDRPRT 
if  the  diagnostic  print  flag  for  the  EDR  output  is  set  to  a  non-zero  value.  This  value  will  identify 
the  skip  increment  between  EDRs  output  to  this  file,  i.e.,  if  the  value  is  4,  every  fourth  EDR  will 
be  printed  out  to  the  diagnostic  output  file. 

e.  Transfer  file  ASCII  output. 


Figure  31  shows  an  example  of  a  transfer  file  record  ASCII  output.  These  will  be  written  to  file 
IESXFRPRT  if  the  diagnostic  print  flag  for  transfer  file  output  is  set  to  a  positive,  non-zero 
number.  If  set  to  a  negative  number,  these  will  be  written  to  the  standard  print  file  as  they  are 


generated. 


*** 

INPUT  *** 

*** 

CHEKIT  *** 

*** 

EXIT  CHEKIT  ***  IFTIME 

28804 

*** 

DECODE  *** 

EXIT  DECODE  IDTIME 

28804  ICCNTR 

105  IQFRME 

1 

*** 

EXIT  INPUT  ***  NFRAME 

5  INTIME 

28804  THEEND 

F 

RDSTAT 

*** 

PROCES  *** 

**★ 

EXIT  PROCES  *** 

*** 

INPUT  *** 

*** 

CHEKIT  *** 

*** 

EXIT  CHEKIT  ***  IFTIME 

28805 

*** 

DECODE  *** 

*** 

EXIT  DECODE  IDTIME 

28805  ICCNTR 

106  IQFRME 

1 

*** 

EXIT  INPUT  ***  NFRAME 

6  INTIME 

28805  THEEND 

F 

RDSTAT 

*** 

PROCES  *** 

*** 

EXIT  PROCES  *** 

**★ 

INPUT  *** 

*** 

CHEKIT  *** 

*** 

EXIT  CHEKIT  ***  IFTIME 

28806 

*** 

DECOOE  *** 

EXIT  DECOOE  IDTIME 

28806  ICCNTR 

107  IQFRME 

1 

*** 

EXIT  INPUT  ***  NFRAME 

7  INTIME 

28806  THEEND 

F 

RDSTAT 

★** 

PROCES  *** 

*** 

EXIT  PROCES  *** 

INPUT  *** 

*** 

CHEKIT  *** 

*** 

EXIT  CHEKIT  ***  IFTIME 

28807 

*** 

DECODE  *** 

*** 

EXIT  DECOOE  IDTIME 

28807  ICCNTR 

108  IQFRME 

1 

EXIT  INPUT  ***  NFRAME 

8  INTIME 

28807  THEEND 

F 

RDSTAT 

*** 

PROCES  *** 

*** 

EXIT  PROCES  *** 

Figure  27  Sample  run  diagnostic  outputs 
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Figure  28  Processing  modules  sample  ASCII  diagnostic  outputs 
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Figure  28  Processing  modules  sample  ASCII  diagnostic  outputs  (continued) 
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SMPRC  Module 

File  Name:  IESSMDIAG 

I/O  Record  Size:  68  words 

Record  Format: 

word 

Variable 

Description 

1 

IDTIME 

Data  frame  time  (seconds  since  midnight) 

2 

IFLT 

Satellite  flight  ID 

3-26 

SMV 

El/AMP  voltages 

27-35 

SMFLT 

Filter  bank  voltages 

36-59 

SMIDEN 

Ion  densities  from  SMV  (ion/cm3) 

60-68 

SMFPDS 

PDS  estimates  from  SJV1FL.T  ((ion/cm3)2/Hz) 

EPPRC  Module 

File  Name:  IESEPDIAG 

I/O  Record  Size:  199  words 

Record  Format: 

word 

Variable 

Description 

1 

IEPTME 

Sweep  center  time  (seconds  since  midnight) 

2 

IFLT 

Satellite  flight  ID 

3 

VBIAS 

Vbi3!  voltage 

4 

MODEP 

EP  sensor  mode  (0-6  :  A-E) 

5 

EPDEN 

Electron  density  (el/cm3) 

6 

EPTMP 

Electron  temperature  (°K) 

7 

EPVPOT 

Satellite  potential  (volts) 

8-103 

VOLT 

Sweep  voltages 

104-199 

C 

Sweep  current  (amperes) 

Figure  29  Formats  of  binary  diagnostic  output  files 
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RPAPRC  Module 


File  Name:  IESRPADIAG 
I/O  Record  Size:  201  words 


Record  Format: 


word 

Variable 

Description 

1 

IRPTME 

Sweep  center  time  (seconds  since  midnight) 

2 

IFLT 

Satellite  flight  ID 

3 

VBIAS 

Vbias  voltage 

4 

RPODEN 

0+  Ion  density  (ion/cm3) 

5 

RPHDEN 

Light  ion  density  (ion/cm3) 

6 

IRPLIF 

Light  ion  flag 

7 

RPITMP 

Ion  temperature  (°K) 

8 

RPAUR 

Ram  ion  drift  velocity,  ur  (m/s) 

9 

RPVPOT 

Satellite  potential  (volts) 

10-105 

VOLT 

Sweep  voltages 

106-201 

CURR 

Sweep  current  (amperes) 

DMPRC  Module 

File  Name:  IESDMDIAG 

I/O  Record  Size:  30  words 

Record  Format: 

word 

Variable 

Description 

1 

IDTIME 

Data  frame  time  (seconds  since  midnight) 

2 

IFLT 

Satellite  flight  ID 

3 

DMLL 

DMLLA/LLB  voltage 

4 

DMIDEN 

Ion  density  derived  from  DMLL  (ion/cm  ) 

5 

IDMH 

Start  location  of  uh  in  DMOFF  (0  or  1) 

6 

IDMV 

Start  location  of  in  DMOFF  (1  or  0) 

7-18 

DMOFF 

DM  offset  voltages 

19-24 

DMUH 

Horizontal  ion  drift  velocity,  uh  (m/s) 

25-30 

DMUV 

Vertical  ion  drift  velocity,  (m/s) 

Figure  29  Formats  of  binary  diagnostic  output  files  (continued) 
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CKLPRC  Module 

File  Name:  IESCKLDIAG 

I/O  Record  Size:  1840  words 


Record  Format: 


word 

Variable 

Description 

1 

ITCKL 

Analysis  time  (seconds  since  midnight) 

2 

IFLT 

Satellite  flight  ID 

3 

APXLAT 

Satellite  Apex  latitude  (deg) 

4 

APXLT 

Satellite  Apex  local  time  (hours) 

5,6 

A,B 

Model  Irregularity  axial  ratios 

7 

DELTA 

Model  delta  angle  (deg) 

8 

L 

Model  effective  layer  thickness  (km) 

9 

P1M 

Model  value  for  p, 

10 

VEFF 

Effective  scan  velocity  (m/s) 

11 

ISWCKL 

( \L  data  source 

12 

NDN 

Number  of  data  points  in  array  DN 

13 

NPDS 

Number  of  data  points  in  arrays  FREQ  and 
PDS 

14 

T1 

T,  parameter 

15 

PI 

p,  parameter 

16 

CKL 

CkL  parameter 

17 

FL 

Low-frequency  cutoff  for  log-linear  PDS  fit 

18 

FU 

High-frequency  cutoff  for  log-linear  PDS  fit 

19-546 

DENDTA 

Raw  density  data  (528  points)  (ion/cm3) 

547-636 

F1LDTA 

SM  PDS  data  (10  9-point  sets)  ((ion/cm3)2/Hz) 

637-1148 

DN 

Detrended  density  data  (NDN  points) 

(ion/cm3) 

1149-1494 

FREQ 

PDS  frequency  array  (NPDS  points)  (Hz) 

1495-1840 

PDS 

PDS  array  (NPDS  points)  ((ion/cm3)2/Hz) 

Figure  29  Formats  of  binary  diagnostic  output  files  (continued) 
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Figure  30  Sample  EDR  ASCII  diagnostic  output 
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4.4.5  Initializing  Fortran  77  Direct  Access  Files. 


The  four  direct-access  files  used  by  the  APGA  system, 

IESEDRFILE,  IESSTATFILE,  IESAGDBXFR1,  IESAGDBXFR2 

are  opened  and  initialized  with  a  (now  meaningless)  header  record  by  the  APGA  program.  These  files 
are  direct  access  due  to  the  complicated  processing  and  multi-access  requirements  of  the  GWC  Sperry 
database  system.  The  header  record  is  also  a  remnant  of  GWC  Sperry  processing. 

4.5  Listings. 

The  complete  set  of  program  listing  for  the  SS1ES  Flight  Data  Processing  System  (programs  APGA, 
LDCON02,  and  BNBA)  is  maintained  by  AFSFC. 


IESXFERPRT.DAT 
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o 
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ro  ro  ro 
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Figure  31  Sample  AGDB  transfer  record  ASCII  diagnostic  output 
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APPENDIX  A:  Program  APGA  Structure  Charts 


> 
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*  =  See  Separate  Structure  Chart 

Dotted  box  indicates  recurrent  section  for  processing  each  second  of  data. 


A 
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print  file 


> 
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See  Separate  Structure  Chart 
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Some  second- level  subroutines  are  not  shown. 


263 


Vehicle  constants 
Processor  control  flags  i 
Data  frame 
Spacecraft  velocity 
Ion  ram  velocity 


Ion  densities 
T  Average  ion  density 
Filter  PDS 

Analysis  results  flag 


SMPRC 


Range  table 
Range  data  word 
CMD  monitor  word 


t  EL  range  setting 

Total  ion  velocity 
Vehicle  constants 
EL/AMP  voltages 


Total  ion  velocity 
Vehicle  constants 
Filter  voltages 


T  SM  filter  PDS 


Ion  densities 
Average  ion  density 


Some  utility  and  second-level  subroutines  are  not  shown. 
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Data  frames 

Vehicle  constants  t 
Process  control  flags 


Electron  density 
T  Electron  temperature 
Vehicle  potential 
Analyses  result  flag 


Raw  data 
frames  -l 


T  Col lected  sweep 


Collected  sweeps  i 
Vehicle  constants 


Sweep 

t  analysis 


Normalization 
reference  i 
Analysis 

result  flags 


Raw  data  frame 
Normalization  flags  l 
Vehicle  constants 


t  Normalization 
flags 


t  DC  mode 
densities 


SWPCOL 

EPSUP 

SELNRM 

EPDC 

Sweep  values  l 


Interpolation 

table  l 

Argument  value 


T  Local  linear  fits 


FITLIN 


t  Function  value 


NTRP 


Some  utility  and  second- level  subroutines  are  not  shown. 
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See  Separate  Structure  Chart 


Ion  temperature 
I  on  dens i t i es 

Complete  RPA  sweep  I  T  Sensor  potential 


Ram  drift  velocity  component 
Analyses  results  flag 


RPA  sweep  i  Clean  & 

f  validated 
sweep 


Potential  Results 
analyses  l  t  array 
result 


Clean  RPA  i  t  Sweep 
sweep  range 

parameters 


Theoretical  Goodness 
sweep  i  t  parameters 
Data  sweep 


Plasma  Theoretical 

RPA  sweep  l  T  Derivative  parameters  -l  T  sweep 
minima 
locations 

Vehicle 

constants 

Derivative  Plasma 
minima  i  t  parameters 
locations 

Sweep 

values 


Saturation  Effective 

region  of  l  T  maximum 
sweep  current 


Some  utility  and  second-level  subroutines  are  not  shown. 
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Data  frames 
Vehicle  constants 
Process  control  flags 
Ion  velocity 


Drift  velocity 
Ion  densities 

Average  component  velocities 
H+  mode  diagnostic  file 
Analysis  result  flag 


Processor 

control 

flags 

DM  command  1 
DM  data 


Updated  flags 

t  Updated  instrument  information 


DMPRC 


Ion  velocity 
Instrument 
constants 
Offset  voltage 


Ion  drift  velocity 

Drift  angle  tangent  DM  data  J 

Drift  angle  tangent 

Ion  velocity  i  T  Ion  density 

LL  data 

Instrument  constants 


DM 


_ 1 

DMIF 

1 _ 

IFO 

_ 1 _ 

DMVEL 

DMDEN 


DM  command  i 


T  Updated  flags 

Updated  instrument  information 


DMFIBA 


i 

FI  BA  mode  print 
f  i  le 


DMCMD 


Some  utility  and  second-level  subroutines  are  not  shown. 


data  l 


HPMODE 


l 

H+  mode  print 
file 
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Data  frames 

Processor  control  flags  i 
Ground  EP  analysis 
Ground  RPA  analysis 


t  MP  analysis  results 


i 

Ground/MP  analyses 
comparison  print 


Some  utility  and  second-level  subroutines  are  not  shown. 


*  =  See  Separate  Structure  Chart 

Some  utility  and  second-level  subroutines  are  not  shown. 
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Detrended  densities 
Filter  data  &  constants  l 
Process  control  flags 


Power  density  spectrum  (PDS) 
T  Decimated  PDS 


Detrended  density  data  i 


Low  frequency  PDS 
f  Decimated  low 
frequency  PDS 


Filter  data  i 
&  constants 


DENPDS 


Window  parameter 


Window  function  -» 
Normalization  factor 


Windowed  data  1 


T  High  frequency  PDS 


FILPDS 


*■  Smoothed  PDS 


PDS  -> 


T  FFT 


_ 1 _ 

WINDOW 

_ 1 _ 

FFT 

1 

BSMOO 

Some  utility  and  second- level  subroutines  are  not  shown. 
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Average  drift  velocity 
Vehicle  ephemeris  i 

Irregularity  parameters 


t  Effective  scan  velocity 


Velocity  vector 

(spacecraft  coordinates) 
Orbital  parameters 


Transformed  velocity 
T  (geographic  coordinates) 


Satellite  location  i 


Magnetic  dip  angle 
I rregulari ty 
orientation 


T  Geomagnetic  field 
components 


T  Transformation  matrix 
(to  irregularity 
coordinates) 


_ 1 _ 

CTRANS 

_ l 

MAGI 

- 1 

:LD 

_ 1 _ 

CMAT 

T  Model  coefficients 


IGRF 


* 
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Ground  analyses 

MP  analyses  1  t  Updated  summary  record 

Process  control  flags 


i 

Spacecraft 
diagnostic 
report 
(optional ) 


i 

Summary  statistics 
to  file/printer 


Process  control  flags 
Diagnostic  print  flags 
Irregularity  model  information 
Data  frame  conversion  factors 
Process  control  information 
Instrument  constants 
i 
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f 
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APPENDIX  B:  Description  of  Data  Analysis  Algorithms 
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B.l  Electron  Probe  (EP)  Processing  Algorithms. 

a.  Sensor  Description. 

The  electron  sensor  is  a  spherical  Langmuir  probe  which  measures  the  current  to  a  collector 
exposed  to  the  environment  as  a  function  of  the  electrostatic  potential  on  the  collector.  The 
sensor  has  five  operational  modes.  Figure  B1  depicts  the  electron  sensor  modes.  The  modes  can 
be  characterized  as  either  sweep  (modes  A,  B,  BS,  and  E)  or  non-sweep  (modes  C,  D,  and  DS). 

During  all  modes  there  is  a  periodic  set  of  calibration  sweeps  to  enable  the  sensor  to  determine  a 
proper  bias  voltage.  These  sweeps  cover  a  broader  voltage  range  as  a  coarser  voltage  step  than 
the  normal  mode  sweeps.  This  helps  assure  that  the  instrument  can  locate  a  suitable  bias  voltage, 
but  results  in  a  less  accurate  determination  of  the  desired  environmental  parameters  when 
processed  as  a  normal  sweep. 

The  sweep  modes  allow  calculation  of  the  electron  temperature,  the  sensor  potential,  the  absolute 
electron  temperature,  and  the  absolute  electron  density.  These  values  can  be  calculated  at  4 
second  intervals  in  modes  A,  B,  and  BS,  or  at  2  second  intervals  in  mode  E. 

In  the  non-sweep  modes,  the  instrument  measures  the  change  in  density  as  function  of  time.  A 
current  measurement  is  accomplished  24  times  each  second.  To  be  useful,  a  density  value  must  be 
periodically  available  so  that  the  current  can  be  scaled  to  provide  the  corresponding  density  values 
at  the  higher  sampling  rate.  To  accomplish  this,  even  in  these  "non-sweep"  modes,  a  sweep  is 
performed  at  32  second  intervals  to  provide  an  absolute  density  value  to  which  the  intervening 
current  measurements  can  be  normalized. 

A  more  complete  description  of  the  electron  sensor  and  its  operational  modes  is  provided  in 
Volume  1,  Technical  Description. 

b.  Sensor  Output. 

The  EP  sensor  generates  30  data  words  each  second,  6  voltages  and  24  currents.  It  takes  four 
seconds  to  accumulate  a  complete  normal  sweep,  three  seconds  to  accumulate  a  calibration  sweep 
and  2  seconds  to  accumulate  a  sweep  in  the  short  sweep  mode  (mode  E).  In  the  DC  mode, 
successive  currents  represent  a  change  in  the  electron  density.  These  currents  can  be  normalized 
to  produce  absolute  density  values.  Normalization  can  be  to  the  periodic  sweep  in  the  EP  data 
occurring  every  32  seconds  in  the  DC  mode,  or  to  any  other  source  of  density  data  available  such 
as  the  RPA  or  the  SM. 

Because  of  limitations  on  the  telemetry  for  vehicles  beginning  with  Fll  (SSIES-2  and  SSIES-3 
instruments),  the  EP  sensor  voltages  are  not  included  in  the  data,  but  are  instead  provided  within 
the  processing  program  (Subroutine  VSWEEP).  Furthermore,  the  EP  current  values  may  also  be 
excluded  from  the  telemetry,  in  favor  of  the  RPA  currents,  based  on  command  settings  for  the 
vehicle. 

c.  Data  Extraction  Algorithm. 

(1)  Sweep  processing. 

(a)  Collect  a  complete  sweep,  ensuring  that  each  second  of  data  is  part  of  the  same  sweep. 

(b)  When  a  sweep  is  fully  collected,  verify  and  clean  up  the  sweep.  The  sweeps  are  all 
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processed  scanning  from  the  high  current  (high  voltage)  end  to  the  low  current  (low 
voltage)  end.  Clean  sweeps  will  be  monotonic.  However,  since  the  environment  is  not 
stable  during  the  entire  sweep,  and  there  is  round-off  error  in  encoding  the  data  into  the 
telemetry  stream,  we  must  allow  for  current  variations  in  both  directions  within  the 
expected  limits  of  geophysical  and  telemetric  noise.  Volume  1,  Technical  Description, 
Figure  6.4.1  depicts  a  typical  EP  sweep  structure. 

(c)  Fit  a  straight  line  to  the  start  of  the  acceleration  region  of  the  sweep. 

(d)  Move  along  the  remainder  of  the  sweep,  doing  a  linear  fit  to  locate  the  maximum  slope  of 
the  sweep.  This  point  should  be  the  point  where  the  slope  first  reaches  maximum.  This 
indicates  the  start  of  the  retarding  region  of  the  sweep. 

(e)  Determine  the  potential  at  this  point  by  finding  the  intersection  of  the  lines  determined  in 
(c)  and  (d). 

(f)  If  desired,  a  quadratic  correction  can  be  applied  to  the  determined  potential.  The 
intersection  of  the  two  lines  is  systematically  offset  a  slight  amount  from  the  actual 
desired  potential. 

(g)  Calculate  the  electron  temperature  from  the  slope  of  the  line  fitted  to  the  retarding 
region: 

Te  =  5040  /  S 

where:  Te  =  electron  temperature, 

S  =  slope  of  fitted  line  at  start  of  retarding  region. 

(h)  Calculate  the  electron  density  from  the  current  at  that  point: 

N  =  2yfc/ 

*  Aeaa 

where:  I  =  current  at  point  of  maximum  slope  (e.g.,  sensor  potential), 

A  =  sensor  area, 

a  =  sensor  transparency, 

a  =  most  probable  electron  speed, 

e  =  electron  charge. 

(2)  DC  mode  processing. 

In  DC  mode,  we  directly  calculate  the  electron  density  by  normalizing  to  the  current  at  the 
sensor  potential  during  the  last  EP  sweep.  The  density  used  for  this  normalization  can  be 
from  any  density  source  available.  Selection  is  based  upon  the  availability  of  a  density 
measurement  at  the  time  the  normalizing  current  is  measured.  A  prioritized  list  is  used  in  the 
software.  Any  of  the  sensors  can  be  disabled/enabled  for  this  purpose  by  setting  a  flag  in  the 
file  IESCNTRLFILE.  The  selection  order  is: 


(a)  Scintillation  Meter  (SM) 

(b)  Retarding  Potential  Analyzer  (RPA) 

(c)  Drift  Meter  (DM) 

(d)  Electron  Probe  (EP) 
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B.2  Retarding  Potential  Analyzer  (RPA)  Processing  Algorithms. 

a.  Sensor  Description. 

The  RPA,  as  shown  in  Volume  1,  Technical  Description,  Figure  3.4.2,  is  a  planar  ion  collector 
that  allows  ions  to  freely  enter  the  aperture.  The  ground  plane  around  the  sensor  ensures  that  the 
surfaces  near  the  sensor  are  electrostatically  uniform,  allowing  the  entering  ion  trajectories  to  be 
represented  by  straight  lines.  Due  to  exposed  contacts  on  the  solar  panel,  the  satellite  potential 
could  reach  a  relatively  large  negative  potential.  To  alleviate  this  problem,  the  ground  plane  is 
isolated  from  the  sensor  and  the  electronics  by  a  large  resistance.  The  ground  plane  floats  at 
some  potential  with  respect  to  the  plasma.  This  potential  is  measured  by  the  sensor  electronics, 
which  then  apply  a  varying  potential  to  the  ground  plane  to  keep  the  ground  plane  near  the 
potential  of  the  undisturbed  plasma.  A  detailed  description  of  the  sensor  can  be  found  in  Volume 
1,  Technical  Description. 

Internally,  the  retarding  grids  are  stepped  through  a  series  of  applied  voltages.  A  single 
Maxwellian  temperature  is  assumed  for  all  ion  species.  When  the  potential  barrier  is  equal  to  the 
energy  gained  by  an  ion  species  from  the  satellite  potential  and  satellite  velocity,  half  the  ions  of 
that  species  will  not  penetrate  the  retarding  grids.  For  a  spatially  uniform  plasma,  the  current 
collected  is  constant  until  the  potential  applied  begins  to  reject  the  lightest  ion  species  present  in 
a  measurable  quantity.  Then  the  current  decreases  monotonically  and  the  magnitude  of  the  rate 
of  change  in  current  with  respect  to  the  change  in  sweep  voltage  increases.  This  rate  of  change 
reaches  a  maximum  at  the  center  of  the  Maxwellian  temperature  distribution.  As  the  applied 
voltage  further  increases,  the  current  becomes  constant  until  the  next  heavier  ion  species  begins  to 
be  rejected.  Figure  B2  represents  a  theoretical  response  for  the  RPA.  If,  due  to  the  spacecraft 
velocity  and  ion  drift  velocities,  there  are  species  which  have  their  rejection  potential  near  the 
same  voltage,  it  will  be  difficult  to  analyze  the  RPA  data.  This  happens  in  the  ionosphere  when 
both  H+  and  He+  are  present  in  significant  amounts. 

b.  Sensor  Output. 

The  RPA  sensor  generates  30  data  words  each  second,  6  voltages  and  24  currents.  It  takes  four 
seconds  to  send  a  complete  sweep. 

Because  of  limitations  on  the  telemetry  for  vehicles  beginning  with  Fll  (SSIES-2  and  SSIES-3 
instruments),  the  RPA  sensor  voltages  are  not  included  in  the  data,  but  are  instead  provided 
within  the  processing  program  (Subroutine  VSWEEP).  Furthermore,  the  RPA  current  values  may 
also  be  excluded  from  the  telemetry,  in  favor  of  the  EP  currents,  based  on  command  settings  for 
the  vehicle. 

During  the  plasma  chamber  testing  of  an  SSIES  instrument,  an  extra  induced  current  was  detected. 
This  displacement  current  is  proportional  to  the  rate  of  change  of  the  sweep  voltage  and  to  the 
capacitance  between  the  collector  and  ground.  This  displacement  current  is  subtracted  from  the 
measured  current  on  the  upsweep  and  added  to  the  measured  current  on  the  downsweep.  Actual 
values  of  this  displacement  current  must  be  determined  from  flight  data. 

The  SSIES  data  processor  and  the  data  simulator  used  to  test  the  processor  provided  for  a 
displacement  current.  An  estimated  value  for  this  displacement  current  was  used.  The 
displacement  current  produced  a  noticeable  effect  on  the  algorithm  analysis  results  at  low 
modelled  ion  densities. 
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APPLIED  POTENTIAL  (VOLTS) 


Figure  B2  Theoretical  instrument  response  to  a  2-ion  constituent  plasma 
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c.  Data  Extraction  Algorithms. 

(1)  Collect  a  complete  sweep,  ensuring  that  each  second  of  data  is  a  part  of  the  same  sweep. 

(2)  When  a  sweep  is  fully  collected,  verify  and  clean  up  the  sweep.  The  sweeps  are  all  processed 
scanning  from  the  high  current  (low  voltage)  end  to  the  low  current  (high  voltage)  end  of  the 
sweep.  Clean  sweeps  will  be  monotonically  increasing  in  voltage,  and,  ideally,  should  be 
monotonically  decreasing  in  current.  However,  since  the  environment  is  not  stable  during  the 
entire  sweep  period,  and  there  is  round-off  error  in  encoding  the  data  into  the  telemetry 
stream,  we  must  allow  for  current  variations  in  both  directions  within  reasonably  expected 
limits  of  geophysical  and  telemetry  noise. 

(3)  Working  from  the  start  (high  current  end)  of  the  sweep  and  disregarding  any  initial  saturated 
currents,  fit  a  straight  line  to  3  successive  data  points  to  determine  the  slope.  This  fitting 
process  is  repeated  for  each  data  point  in  the  sweep  to  locate  positions  where  the  slope 
reaches  a  local  relative  minima.  If  more  than  two  minima  are  found,  increase  the  number  of 
points  used  in  the  fitting  process  and  scan  the  sweep  again.  When  we  have  smoothed  the 
sweep  through  this  process  until  there  are  at  most  two  local  minima,  we  can  calculate  the 
required  environmental  parameters. 

(4)  If  there  are  two  local  minima,  assume  that  there  are  both  heavy  ions  (Oxygen)  and  light  ions 
(Hydrogen  and/or  Helium)  present.  The  following  quantities  are  used  in  the  analysis 

=  potential  at  ilh  local  minima, 

IG  =  maximum  current, 

Ii  =  current  at  i,h  local  minima, 

m;  =  mass  of  ith  constituent, 

a;  =  most  probable  speed  of  ilh  constituent, 

S|  =  slope  at  ilh  local  minima, 

V5  =  satellite  velocity, 

V,  =  total  relative  velocity  between  ions  and  satellite, 

A  =  sensor  aperture  area, 

a  =  sensor  transparency, 

z  =  ionization  level  number, 

e  =  electron  charge, 

k  =  Boltzmann’s  constant. 
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(a)  Calculate  the  sensor  potential. 


4>,  = 


4>2ml  -  4>1«2 


m2  -  ml 


(b)  Calculate  the  ram  direction  drift  velocity. 
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(c)  Calculate  the  heavy  ion  [0+]  density  and  temperature. 
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(d)  Calculate  the  light  ion  density. 


N  = 


2 

f  l0 

AeaV 

K  a\ 

1  +  ERF  ‘  +  1  EXP 

ai  M 

<1. 

(5)  If  only  one  local  minimum  is  found,  assume  that  only  one  ion  species  is  present  (Oxygen). 
With  only  one  local  minimum  in  the  first  derivative  of  the  sweep,  we  cannot  unambiguously 
calculate  all  parameters  of  interest.  Therefore,  we  must  make  some  assumptions. 

(a)  For  geomagnetic  mid-latitudes,  assume  that  the  ram  direction  drift  velocity  is  zero  and 
calculate  the  sensor  potential. 


(b)  For  geomagnetic  polar  latitudes,  use  an  estimated  sensor  potential  (try  to  use  the  EP 
sensor  analysis  results)  and  calculate  the  ram  direction  drift  velocity  as  in  the  two-species 
case  above. 
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B.3  Drift  Meter  Processing  Algorithms. 

a.  Sensor  Description. 

The  ion  Drift  Meter  (DM)  is  a  planar  Faraday  cup  sensor  located  on  the  ion-sensor  ground  plane 
with  the  ion  RPA  and  ion  Scintillation  Meter  sensors.  The  sensor  is  oriented  with  its  normal 
parallel  to  the  spacecraft  direction-of-travel  (+ys).  The  sensor  has  a  retarding-potential  grid  which 
can  be  set  to  fixed  positive  voltages  (with  respect  to  the  ion-sensor  ground  plane)  to  retard  light 
ions  (such  as  H+),  or  can  be  driven  by  a  varying  potential  periodically  to  retard  the  light  ions. 

This  last  mode  of  operations  is  called  H+  mode,  while  the  other  modes  in  which  the  grid  is  set  at 
a  fixed  potential  are  called  normal  modes.  An  alternative  mode,  unique  to  SSIES2,  is  the  DM 
FIBA  (Filter  Bank)  mode,  which  is  similar  to  the  normal  mode,  but  also  generates  high-frequency 
filter  outputs.  The  collector  plate  at  the  base  of  the  DM  sensor  is  divided  into  four  electrically 
isolated  segments  as  shown  in  Volume  1,  Technical  Description,  Figure  4.1.  A  detailed 
description  of  this  sensor  can  also  be  found  in  Volume  1. 

b.  Sensor  Output. 

In  all  operating  modes,  the  DM  sensor  generates  13  data  words  every  second,  12  offset  voltages 
and  1  voltage  from  either  the  LLA  (LL  for  Log  Level)  or  LLB  amplifier.  In  FIBA  mode,  the  6 
DM  FIBA  data  words,  occurring  every  other  second,  contain  additional  data  for  the  filter  band 
values.  In  normal  mode,  the  12  offset  voltages  can  be  used  to  calculate  the  cross-track  ion  drift 
velocities,  uh  and  uv,  and  the  LLA/LLB  voltages  can  be  used  to  calculate  the  total  ion  density  (if 
the  retarding  grid  is  set  to  zero  potential).  The  offset  voltages  alternate  between  horizontal  and 
vertical  measurements.  In  H+  mode,  the  first  two  offset  voltages  can  be  used  to  calculate  uh  and 
but  the  remainder  of  the  data,  including  the  LLA/LLB  measurements,  are  not  usable  until 
algorithms  are  developed  for  processing  it.  The  only  other  H+  data  currently  used  by  the  APGA 
program  is  the  LLA  data,  which  is  used  in  H+  mode  as  a  cycle  counter.  The  DM  sensor  operates 
in  a  four-second  cycle  while  in  H+  mode.  There  is  no  data  word  available  for  a  cycle  counter,  so 
the  LLA  output  voltage,  which  is  reported  in  every  data-frame  cycle  1,  is  set  to  5.11  volts  at  the 
start  of  each  four  second  cycle.  There  is  also  currently  no  algorithm  developed  for  processing  the 
DM  FIBA  values. 

c.  Data  Extraction  Algorithms. 

The  interpretation  of  the  DM  data  from  the  Common  Format  data  frame  is  complicated  by  H+ 
mode  operations  and  the  fact  that  the  orientation  of  the  DM  sensor  in  the  spacecraft  coordinate 
system  determines: 

1.  whether  horizontal  or  vertical  offset  voltages  are  reported  first  or  second  in  the  data  frame 
DM  words,  and 

2.  the  sign  of  the  velocities  derived  from  the  offset  voltages. 

The  operating  mode  of  the  DM  sensor  and  the  potential  on  the  retarding  grid  can  be  determined 
from  the  DSM  command  monitor  which  is  reported  in  Common  Format  data  frame  word  3/cycle  2 
(Volume  1,  Technical  Description,  Tables  10.1.3,  and  10.2.3  list  the  DSM  commands  and  the 
corresponding  sensor  statuses). 

In  normal  mode  operations,  the  only  "trick"  to  extracting  the  data  is  in  determining  if  the  first 
offset  voltage  reported  in  each  data  frame  is  a  horizontal  or  vertical  measurement.  This  is  fixed  by 
the  orientation  of  the  sensor  on  the  spacecraft.  Two  location  parameters  stored  in  file 
IESCNTRLFILE  are  used  to  specify  where  in  the  data  frame  DM  words  the  horizontal  and 
vertical  offset  voltages  are  located.  If  horizontal  offsets  are  reported  first,  the  horizontal  location 


constant  should  be  0  and  the  vertical  location  constant  should  be  1.  If  vertical  offsets  are  reported 
first,  these  values  should  be  reversed.  The  orientation  of  the  DM  sensor  should  be  provided  by 
USAF  Space  Division.  If  there  is  any  doubt  of  the  orientation,  the  relative  magnitudes  of  the  two 
velocities  calculated  should  be  compared.  At  almost  all  times,  the  magnitude  of  the  horizontal 
drift  velocity  should  be  appreciably  larger  than  the  magnitude  of  the  vertical  drift  velocity.  If  this 
is  not  the  case  in  the  calculated  velocities,  the  orientation  is  probably  not  as  advertised,  and  the 
values  of  the  location  constants  should  be  reversed  from  their  current  setting. 

The  "tricks"  to  H+  mode  operations  are  twofold.  First,  care  must  be  taken  to  determine  when  the 
DM  sensor  is  in  H+  mode,  as  the  data  will  be  quite  different.  This  is  tracked  by  monitoring  the 
DM  command  monitor  word,  the  DSM  subcom  status  words,  and  the  values  reported  in  the  LLA 
data  word.  If  either  the  command  monitor  or  the  subcom  status  indicate  that  the  sensor  has  been 
commanded  into  H+  mode  or  a  5.11  volt  reading  is  reported  in  the  LLA  data  word,  the  DMPRC 
module  assumes  that  the  sensor  is  either  in  or  about  to  be  in  H+  mode  and  enters  a  wait  status. 
This  wait  status  will  continue  until  the  other  H+  mode  indicator  (command  monitor  or  5.11  volt 
LLA  reading)  is  encountered  or  the  subcom  cycle  restarts.  At  that  time,  the  sensor  is  assumed  to 
be  in  H+  mode  (if  this  is  consistent  with  the  subcom-designated  mode).  The  same  procedure  is 
followed  in  going  out  of  H+  mode.  When  in  H+  mode,  only  the  first  two  offset  voltage  values 
from  each  data  frame  are  processed.  These  data  are  a  horizontal/vertical  offset  measurement  pair, 
but  they  are  in  the  reverse  order  in  H+  mode  cycles  3  and  4  from  that  reported  in  normal  mode 
(or  in  H+  mode  cycles  1  and  2).  This  is  the  second  "trick"  to  H+  mode  processing. 

In  DM  FIBA  mode,  the  six  filter  band  values  are  acquired  from  the  odd  cycles  of  the  Common 
Format. 

d.  Data  Reduction  Algorithms. 

1.  Normal  Mode. 

The  angle,  a,  between  the  normal  to  the  DM  sensor  and  the  horizontal  or  vertical  projection 

of  the  velocity  vector  of  the  ions  can  be  calculated  from  the  offset  voltages  from: 

tan  a  =  Cd  (Vm  -  V$) 

where:  Cd  is  a  sensor  constant  from  file  IESCNTRLFILE, 

V,m  is  the  offset  voltage  extracted  from  the  data  frame 

Vcd  is  the  zero  voltage  for  the  offset  measurements,  either  from  file 

IESCNTRLFILE  or  from  the  value  reported  in  word  15  of  the 
Common  Format. 

The  ion  drift  velocities  can  then  be  calculated  from: 

uh  =  sh  <?s  +  “,)  1311  “a 

“v  =  sv  (v,  +  “,)  ^  av 

where:  Sh,  Sv  are  the  sign  constants  (±1.0)  from  file  IESCNTRLFILE, 

v5  is  the  spacecraft  orbital  velocity, 

ur  is  the  ion  ram  velocity  (from  the  RPA  analysis,  if  available). 

The  two  sign  constants  are  set  up  in  conjunction  with  the  horizontal/vertical  location 
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constants  described  above  so  that  the  two  velocities  will  be  correctly  oriented  in  the  spacecraft 
coordinate  system.  This  calculation  is  implemented  in  function  DMVEL. 

If  the  retarding  grid  potential  is  zero  (which  can  be  determined  from  the  DM  command 
monitor,  word  3/cycle  2  in  the  Common  Format),  the  total  ion  density  can  be  estimated  from 
the  LLA/LLB  voltages  from: 


(v,  +  ) 


where: 

e 

A 

21 

is  the 
is  the 
is  the 

electron  charge, 

effective  area  of  the  DM  sensor  from  file  IESCNTRLFILE, 
total  ion  current  calculated  from: 

/  = 

10*“  _  10*" 

1+tctana  1-tctana 

where: 

K 

LLA,  LLB 

is  a  sensor  constant  from  file  IESCNTRLFILE, 
are  the  LLA/LLB  log  currents. 

Tan  a  values  are  those  from  the  offset  measurement  reported  in  the  data  frame  just  prior  to 
the  LLA/LLB  data  word. 

The  LLA/LLB  log  currents  are  calculated  from  the  LLA/LLB  voltages  reported  in  the  data 
frame  from: 

LIA  =  GlVlm  +  Gq 
LLA  =  G2Vm  ♦  Gq 

where  the  four  G  values  are  from  file  IESCNTRLFILE.  This  calculation  is  implemented  in 
function  DMDEN. 

[Note:  See  the  data  reduction  description  for  this  sensor  in  the  SSIES  Project  Notebook.  This 
description  was  provided  by  the  DM  instrument  builders  at  the  University  of  Texas  at  Dallas. 
Values  for  the  various  constants  stored  in  file  IESCNTRLFILE  are  provided  by  them.] 

2.  H+  Mode. 

At  this  time,  only  the  first  two  offset  voltages  are  processed.  These  values  are  normal  mode 
horizontal  and  vertical  (or  vertical  and  horizontal)  ion  velocity  measurements,  which  are 
converted  from  voltages  to  velocities  in  the  same  manner  as  specified  above.  The  data 
reduction  algorithms  for  the  rest  of  the  H+  mode  data  are  TBD. 

3.  DM  FIBA  Mode. 

The  voltage  from  any  of  the  filters  is  converted  to  an  estimate  of  the  power  spectral  density 
(PDS)  by  first  converting  it  to  an  estimate  of  the  RMS  variance  in  the  DM  current  for  the 
filter  frequency  from: 
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where: 

(RMS(AI))j 

Log10  (RMS(AI))j  =  GVj  -  V.0 

is  the  RMS  variance  in  the  DM  current  at  a  frequency 

Gj 

corresponding  to  the  j!h  filter  (j  =  1-NDMFLT), 
is  the  gain  of  the  amplifier  for  the  j‘h  filter, 

Vj 

is  the  voltage  output  from  the  jlh  filter, 

Vjo 

is  the  voltage  offset  for  the  jth  filter, 

This  is  converted  to  an  estimate  of  the  RMS  variance  in  AN|  by: 


(RMS^N^  = 


Ae  (y,  +  Ur  ) 


where:  A,.  is  the 

vs  is  the 

ur  is  the 

The  RMS  variance  is  then 
filter  by: 


effective  area  of  the  sensor, 
satellite  velocity, 
ram  ion  drift  velocity. 

converted  to  an  estimate  of  the  PDS  at  the  frequency  of  the  jth 


(RMS(AN))2 

PDS.  =  - L 

’  B> 

where:  Bj  is  the  bandwidth  (Hz)  of  the  jth  filter. 


This  algorithm  is  implemented  in  Subroutine  DMFIBA. 


\ 


A 
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B.4  Scintillation  Meter  Processing  Algorithms. 

a.  Sensor  Description. 

The  ion  Scintillation  Meter  (SM)  is  a  planar  Faraday  cup  sensor  located  on  the  ion-sensor  ground  > 

plane  with  the  ion  RPA  and  ion  Drift  Meter  sensors.  The  sensor  is  oriented  with  its  normal 
parallel  to  the  spacecraft  direction-of-travel  (+ys).  The  output  of  the  sensor  collector  is  a  current 
which  is  proportional  to  the  ion  density  being  swept  into  the  collector,  due  primarily  to  the 
motion  of  the  satellite.  Volume  1,  Technical  Description,  Figure  3.4.4  shows  a  cross  section  of  the 
SM  sensor.  The  current  is  converted  to  a  voltage  in  an  electrometer  (EL),  which  can  be  set  in  any 
of  five  sensitivity  ranges.  The  electrometer  output  is  split  into  three  paths,  one  to  a  difference 
amplifier,  one  to  an  analog  multiplexer,  and  one  to  a  wideband  ranging  amplifier.  The  difference 
amplifier  (AMP)  subtracts  a  base  level  voltage  (from  a  previous  EL  output)  from  the  latest  EL 
output,  amplifies  it  by  (roughly)  a  factor  of  10,  and  sends  the  amplified  voltage  to  the  analog 
multiplexer  with  the  raw  EL  output.  The  wideband  ranging  amplifier  can  also  be  set  to  any  of  five 
sensitivity  ranges.  The  amplified  output  is  based  to  a  bank,  or  comb,  of  band-pass 
filters/amplifiers  which  output  voltages  proportional  to  the  variance  in  density  at  9  (6,  for  IES2 
and  later  configurations)  specific  fluctuating  frequencies.  (Since  the  satellite  is  moving,  the 
frequencies  can  be  converted  to  equivalent  scale  sizes  by  assuming  that  all  variations  measured  are 
spatial  and  dividing  the  satellite  velocity  by  the  filter  center  frequencies.) 

b.  Sensor  Output. 

1.  Density.  The  SM  sensor  provides  24  voltages  per  second  from  either  the  EL  or  AMP  outputs, 
which  can  be  converted  to  ion  density.  Imbedded  in  this  stream  are  flags  which  indicate  when 
the  analog  multiplexer  has  switched  between  the  EL  or  AMP  outputs  and  when  the  EL  sensor 
has  changed  its  range  setting.  The  EL/AMP  sequences  used  by  the  SM  sensor  and  the  various 
flags  used  to  indicate  status  changes  are  quite  complex.  The  basic  description  of  these  can  be 
found  in  Volume  1,  Technical  Description,  Section  6.3.  The  normal  sequence,  used  when  the 
ion  density  variations  are  small,  starts  at  the  first  SM  EL/AMP  word  with  two  zero  flags 
indicating  an  AMP-to-EL  source  change  (which  may,  on  rare  occasions,  be  a  single  zero  flag), 
followed  by  two  readings  from  the  EL  output,  followed  by  a  5.11-volt  flag  indicating  an  EL-to- 
AMP  source  change,  followed  by  AMP  readings  until  8  cycle  1  data  frames  have  passed  (15  or 
16  seconds).  At  that  time,  the  sequence  repeats  itself.  If  the  AMP  output  overranges  (i.e.,  the 
AMP  output  converts  to  a  telemetry  voltage  less  than  0.0  or  greater  than  5.11),  two  zero  flags 
are  reported  followed  by  EL  readings  until  the  next  cycle  1  data  frame.  At  that  time,  a  5.11 
flag  is  reported  followed  by  AMP  samples.  If  the  AMP  does  not  overrange  in  the  next  second, 
the  sequencing  continues  until  the  next  normal  switch  to  EL  is  required  or  an  overrange 
occurs.  If  the  AMP  overranges  within  the  next  second  after  a  reset  from  EL,  the  output  will 
remain  on  the  EL  for  the  next  8  cycle  1  data  frames  (15  or  16  seconds)  at  which  time  a  5.11 
flag  will  be  reported  and  the  output  will  switch  to  AMP.  These  same  two  sequences  will  be 
followed  if  the  output  is  currently  from  the  AMP  and  the  electrometer  requires  a  range 
change,  except  that  a  range  data  word  will  be  reported  rather  than  zero  flags  at  the 
changeover.  If  an  EL  range  change  occurs  while  the  output  is  on  EL,  the  sequence  will 
continue  unaltered.  NOTE:  Be  sure  that  this  sequencing  as  described  in  reference  1.2.3d  is 
fully  understood  before  attempting  to  modify  the  ELAMP  subroutine.  Table  B1  lists  the 
(nominal)  minimum  and  maximum  ion  densities  which  can  be  reported  by  the  SM  sensor  for 

five  values  of  the  ram  drift  velocity. 

2.  Density  variance.  One  sample  is  output  from  each  of  the  nine  (six,  for  IES2  and  subsequent  /. 

configurations)  filters  every  second. 
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Table  B1  SM  sensor  density  ranges 


Ur 

max  N; 

min  Ni 

-2 

1.4xl06 

8.0xl02 

-1 

1.2xl06 

6.7xl02 

0 

l.OxlO6 

5.8xl02 

+  1 

0.9xl06 

O 

l-H 

X 

t-H 

+2 

O.SxlO6 

4.6xl02 

km/s 

ion/cm3 

ion/cm3 

Note:  These  values  assume  a  spacecraft  velocity  of  7.44  km/s  and  use  the  nominal  EL  amplifier 

sensitivity  ranges  listed  in  reference  1.2.3d. 


3.  Range  data.  A  single  range  data  word  is  output  once  every  second  as  part  of  the  filter  comb 
output.  This  word  indicates  the  range  setting. 

c.  Data  Extraction  Algorithms. 

1.  Density  data.  As  can  be  seen  from  the  above  description  of  the  sensor,  extraction  and 

identification  of  the  EL/AMP  data  is  quite  complicated.  It  is  complicated  by  the  expectation 
that  an  occasional  data  frame  will  be  missing,  which  makes  it  possible  to  miss  a  change 
between  EL  and  AMP.  An  additional  complication  is  that  the  range  and  status  change  flags 
imbedded  in  the  EL/AMP  data  stream  are  not  necessarily  uniquely  different  from  EL/AMP 
voltages,  although  this  problem  will  occur  only  in  well  defined  special  cases  (at  the  high 
density  end  of  the  least  sensitive  EL  range  setting  and  the  low  density  end  of  the  most 
sensitive  EL  range  setting).  The  steps  followed  in  extracting  the  data  are  covered  in  detail  in 
the  description  of  the  ELAMP  subroutine  (section  2.4.4.1.3).  The  discussion  here  will  focus 
on  various  quirks  and  oddities  in  the  processing.  (See  note  at  end  of  this  section) 

(a)  AMP  zero-current  bias.  The  AMP  output  is  not  an  absolute  measure  of  the  current 
collected  by  the  SM  sensor.  It  is  the  difference  between  the  latest  output  and  the  current 
output  at  the  time  the  source  of  the  EL/AMP  output  switched  from  EL  to  AMP.  In 
order  to  calculate  the  total  current,  and  thus  the  total  ion  density,  the  EL  output  current 
(or  the  density  corresponding  to  this  current)  at  the  time  of  the  switch  must  be  available. 
This  value  must  be  retained  from  one  data  frame  to  the  next  until  a  new  EL  reading  is 
obtained.  In  Subroutine  ELAMP,  this  is  saved  in  the  form  of  a  base  ion  density  in 
variable  DENO.  No  AMP  data  will  be  processed  until  a  DENO  value  is  obtained. 

(b)  Amplifier  range  settings.  The  electrometer  amplifier  and  the  wideband  ranging  amplifier 
both  have  five  sensitivity  settings  which  are  used  to  keep  the  reported  voltages  from  the 
EL/AMP  data  and  from  the  filter  data  within  the  range  allowed  by  the  9-bit  telemetry 
words  (000  to  511).  The  EL  amplifier  (not  to  be  confused  with  the  differencing  amplifier, 
denoted  AMP)  will  automatically  adjust  the  range  setting  to  provide  the  most  sensitive 
setting  which  will  allow  the  voltages  from  measured  current  to  remain  within  the 
telemetry  band.  The  wideband  (WB)  amplifier  can  either  operate  in  this  mode  or  remain 
fixed  at  a  single  setting  as  commanded  from  the  ground.  The  settings  for  both  ranging 
amplifiers  are  reported  once  per  data  frame  in  the  range  data  word  (data  frame  word  16 
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in  the  Common  Format)  via  a  voltage  which  is  converted  to  the  range  settings  (1-5)  using 
a  look-up  table.  This  look-up  table  is  stored  in  file  IESCNTRLFILE  and  is  used  in 
Subroutine  RANGE  to  determine  the  range  settings  for  the  two  amplifiers.  The  EL  range 
can  also  be  reported  whenever  it  changes  in  the  EL/AMP  data  stream.  In  this  case  the 
range  setting  is  reported  as  one  of  five  voltages  nominally  outside  the  allowed  voltage 
range  of  EL/AMP  density  measurements.  This  voltage  is  converted  to  a  range  setting  by  a 
second  look-up  table  (with  only  five  entries)  also  stored  in  IESCNTRLFILE.  NOTE: 
When  either  amplifier  undergoes  a  range  setting  change,  the  filter  data  should  not  be  used 
for  that  data  frame. 

(c)  Missing  data  frames.  If  one  or  more  data  frames  are  skipped,  there  is  some  uncertainty  as 
to  the  source  of  the  EL/AMP  data,  since  the  source  may  have  changed  during  the  time 
covered  by  the  missing  frames,  and  uncertainty  in  the  value  to  use  as  the  zero-current  bias 
for  AMP  data,  as  this  also  may  have  changed.  Processing  of  the  EL/AMP  data  is 
suspended  until  an  unambiguous  status  change  flag  is  found  in  all  cases  save  one  -  if  the 
data  source  was  from  EL  in  the  last  good  data  frame,  no  range  changes  have  occurred  (as 
indicated  in  the  range  data  word)  since  the  last  good  data  frame,  and  the  EL  sequence 
counter  (variable  NEL)  indicates  that  the  data  source  should  still  be  EL.  Then,  and  only 
then,  will  processing  of  the  EL/AMP  data  continue  with  the  first  good  data  frame  after 
the  missing  data  frames  without  requiring  a  status  change  flag. 

(d)  EL  range-flag/data  ambiguities.  The  imbedded  status  flags  in  the  EL/AMP  data  stream 
are  nominally  5.11  volts  for  an  EL-to-AMP  switch,  0.0  volts  for  an  AMP-to-EL  change 
with  no  coincident  EL  range  change,  and  a  range  of  voltages  from  0.12  to  0.28  volts  for  a 
EL  range  change.  The  range  of  voltages  from  the  EL  output  corresponding  to  density 
measurements  is  constrained  to  0.3-5.0  volts  with  two  exceptions:  1)  when  the  EL 
amplifier  range  setting  is  at  its  least  sensitive  (range  5),  the  output  voltage  is  no  longer 
constrained  to  remain  below  5.0  volts  (high-density  ambiguity),  and  2)  when  the  EL 
amplifier  range  setting  is  at  its  most  sensitive  (range  1),  the  output  voltage  is  no  longer 
constrained  to  remain  above  0.3  volts  (low-density  ambiguity).  In  the  high-density  case,  an 
EL-to-AMP  flag  should  only  occur  in  the  first  five  EL/AMP  data  words  in  a  data  frame. 
Therefore,  an  apparent  EL-to-AMP  flag  located  elsewhere  when  the  EL  range  is  5  is 
processed  as  density  data.  If  it  is  in  the  first  five  words,  the  processing  is  switched  to 
AMP  and  a  flag  is  set  to  check  the  next  data  point  to  make  sure  that  this  was  not  just  a 
high-density  measurement.  In  the  low-density  case,  if  the  data  source  is  currently  EL  and 
the  range  data  word  shows  no  change  in  the  range  setting  during  the  current  data  frame, 
any  voltages  below  0.3  are  assumed  to  be  density  measurements.  If  the  output  source  is 
AMP,  any  voltage  below  0.3  is  assumed  to  be  an  AMP-to-EL  change  with  a  possible  EL 
range  change. 

2.  Density  variance  data.  Extraction  and  interpretation  of  the  filter  data  is  much  less 

complicated.  The  only  special  case  which  needs  to  be  accounted  for  in  extracting  the  data  is 
one  mentioned  earlier:  the  filter  data  should  not  be  used  from  any  data  frame  in  which  either 
the  EL  or  WB  ranging  amplifiers  change  range. 

Data  Reduction  Algorithms. 

1.  Density.  The  voltage  from  EL  or  AMP  is  converted  to  ion  density  by  one  of  the  following 
equations: 


(EL  data) 


G  EL  X  ^ BL 

At  (V,  +  K,  ) 


where: 


K  =  N„  * 


&EL  X  K tMP 


(AMP  data ) 


^EL>  ^AMP 


'  Ae<?s  +  «,  ) 

are  voltages  from  the  EL  or  AMP  output,  respectively, 
is  the  satellite  velocity, 
is  the  ion  ram  drift  velocity, 
is  the  effective  area  of  the  sensor, 

is  the  density  calculated  from  the  last  EL  density  measurement, 
is  a  gain  factor  for  the  electrometer,  given  by: 

Gtt  =  G0x/iO(/“,) 


where: 


is  the  gain  factor  for  the  most  sensitive  range  setting, 
is  the  range  setting  number  (1-5,  where  JEL  =  1  is  the  most  sensitive 
setting). 


The  algorithms  to  calculate  density  and  gain  are  implemented  in  Subroutine  ELAMP. 

2.  Density  variance.  The  voltage  from  any  of  the  filters  is  converted  to  an  estimate  of  the  power 
spectral  density  (PDS)  by  first  converting  it  to  an  estimate  of  the  RMS  variance  in  the  EL 
current  for  the  filter  frequency  from: 

(2  “  j yr  J  nm  ) 

L°gl0  (RMS( AD),  =  GjVj  -  V.0 - f-3- 

where:  (RMS(AI))j  is  the  RMS  variance  in  the  EL  current  at  a  frequency 

corresponding  to  the  jlh  filter  (j  =  1-NSMFLT), 

Gj  is  the  gain  of  the  amplifier  for  the  jlh  filter, 

V,  is  the  voltage  output  from  the  jlh  filter, 

V|0  is  the  voltage  offset  for  the  j,h  filter, 

JEL  is  the  range  setting  number  for  the  electrometer  amplifier, 

JWB  is  the  range  setting  number  for  the  wideband  ranging  amplifier 

(1-5,  where  JWB  =1  is  the  most  sensitive  setting). 

This  is  converted  to  an  estimate  of  the  RMS  variance  in  ANj  by: 

(RMS(AD). 

(RMS(ANj))j  =  — - z- 

'  Ar  (V,  +  Ur  ) 

which  is  then  converted  to  an  estimate  of  the  PDS  at  the  frequency  of  the  jth  filter  by: 

(RMS(AN))2 

PDS.  =  - L 

’  Bi 

where:  Bj  is  the  bandwidth  (Hz)  of  the  j,b  filter. 

This  algorithm  is  implemented  in  Subroutine  FILTER. 
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NOTE: 


The  preceding  discussions  of  processing  the  SM  EL/AMP  data  are  based  on  the  designed 
behavior  of  the  various  range  flags.  During  the  early  orbit  checkout  of  the  SSIES  package  on 
satellite  F8  it  became  apparent  that  both  the  imbedded  flags  and  the  range  data  flag  were 
"floating"  away  from  their  nominal  voltage  values.  In  particular,  the  0.0-volt  flag  which  was  to 
indicate  a  change  from  the  AMP  to  the  EL  with  no  associated  range  change  was  being 
reported  anywhere  in  the  range  from  0.01  to  0.12  volts,  which  overlaps  the  lowest  voltage  of 
the  imbedded  range  change  flags.  These  flags,  in  turn,  were  floating  roughly  0.02  to  0.04  volts 
above  their  nominal  values,  and  the  range  data  flag  was  floating  roughly  0.03  to  0.06  volts 
above  its  nominal  values.  The  ELAMP  and  RANGE  routines  were  completely  rewritten  to 
allow  processing  the  data  as  it  was  being  reported,  but  at  a  cost  of  being  unable  to  process  all 
of  the  data.  There  will  be  times  when  the  software  cannot  differentiate  between  a  floating 
flag-voltage  and  a  density-data  voltage.  At  these  times,  the  processor  will  place  itself  into  a 
wait  status  until  a  totally  unambiguous  5.11  volts  EL- to- AMP  flag  is  found  in  either  data  word 
1  or  data  word  5  (see  function  FND511). 


B.5  QL  Calculation  Algorithm. 


IMPORTANT  NOTE:  In  the  following  discussion,  the  assumption  is  made  that  the  ionospheric 
plasma  is  locally  neutral,  i.e.,  the  electron  density  equals  the  ion  density  equals  the  plasma  density. 

a.  Background. 

Small-scale  irregularities  in  the  ionospheric  plasma  density  can  be  characterized  in  their  behavior 
in  the  time  (or  space)  domain  by  parameters  which  describe  the  variance  of  the  observed  density 
from  a  background  trend,  and  in  the  frequency  (or  wave-number)  domain  by  parameters  which 
describe  the  power  density  spectrum  (PDS)  of  the  irregularities.  The  usual  parameters  measured 
in  the  time  domain  are  the  RMS  (root  mean  square)  variation  of  the  density  about  the  trend, 
RMS(AN),  and  the  relative  RMS  variation,  (RMS(AN))/N,  where  N  is  the  average  density  for  the 
data  sample.  Figure  B3  shows  a  fairly  typical  (one-dimensional)  PDS  for  ionospheric  irregularities 
which  shows  the  power-law  nature  of  the  PDS,  i.e.,  the  PDS  can  be  adequately  modeled  by  a 
power-law  distribution  of  the  form: 


PDSif)  =  r,  fp' 


On  a  log-log  plot,  such  as  Figure  B3,  this  will  be  a  straight  line  with  a  slope  -p,  and  a  value  of  T, 
at  a  frequency  of  1  Hz.  These  two  parameters  are  those  typically  used  to  characterize  the 
frequency  domain  behavior  of  the  irregularities. 

Both  of  these  descriptions  of  the  irregularities  are  not  wholly  adequate  to  describe  the 
irregularities  for  three  reasons.  First,  the  measurements  from  which  they  are  taken  are  necessarily 
one-dimensional  (a  probe  moving  along  a  single  axis  through  a  three-dimensional  medium),  while 
the  irregularities  are  three-dimensional  in  distribution  and  shape.  Second,  both  descriptions  have 
folded  into  them  factors  involving  the  speed  of  the  probe  with  respect  to  the  irregularities  in  a 
coordinate  system  defined  by  the  orientation  and  shape  of  the  irregularities.  Thus,  a  probe 
travelling  through  an  irregularity  patch  in  one  direction,  such  as  along  the  local  geomagnetic  field 
direction,  will  provide  quite  different  measures  for  RMS(AN)  and  (T„  p,)  than  the  same  probe 
moving  through  the  same  irregularity  patch  across  the  local  field  direction.  Finally,  the  RMS(AN) 
and  (RMS(AN))/N  parameters  will  be  a  function  of  the  size  of  the  data  sample  from  which  the 
measurement  is  taken  and  the  characteristics  of  the  calculation  and  removal  of  the  background 
trend.  This  will  also  affect  the  measurements  of  Tj  and  p„  but  not  as  severely. 

Either  RMS(AN)  or  the  (Tj,  pj)  set  can  be  used  to  calculate  a  fifth,  and  final,  parameter  which 
describes  the  three  dimensional  power  law  distribution  of  the  irregularities,  Ck.  This  parameter  is 
designed  as  the  power  spectral  density,  or  irregularity  "strength,"  of  the  three  dimensional 
irregularity  PDS  at  a  scale  size  of  one  kilometer.  (Note:  This  parameter  is  identical  in  concept  to 
the  traditional  Ck  parameter  which  is  defined  at  a  scale  size  of  2  meters.)  It  can  be  calculated,  in 
theory,  from  either  the  RMS(AN)  or  (T^  pj)  observations  via  the  following  equations: 

Ck  =  5  x  108  r  J-  |j  px  ( RMS(AN ))2  (B_01) 

(B-02) 


Ct  =  5  x  108  Pl  f- 


where:  a 


is  the  largest  scale  size  (known  as  the  outer  scale  size), 


Log  Power  Density  ((el /cnr)  /Hz) 


Figure  B3  Sample  irregularity  power  density  spectrum 
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r  is  the  gamma  function, 

Veff  is  the  velocity  of  the  probe  with  respect  to  the  irregularities  in  the  irregularity 
coordinate  system. 

While  C*  can  be  calculated  from  the  RMS(AN)  using  Equation  B-01,  selecting  a  proper  value  for 
the  outer  scale  size  provides  an  additional  level  of  uncertainty  in  the  calculation.  In  practice,  a  is 
usually  specified  by  the  size  of  the  data  set  from  which  the  RMS(AN)  was  measured  or  by  the 
largest  scale  size  remaining  after  the  trend  is  removed.  In  the  APGA  program,  Q.  is  calculated 
from  measurements  of  Tj  and  pj  using  Equation  B-02.  This  avoids  the  outer  scale  question  and,  if 
the  data  preparation  is  done  carefully,  can  provide  reasonably  good  estimates  for  Q  from  finite 
data  samples. 

In  order  to  use  the  Ck  parameter  for  estimating  the  effects  of  the  irregularities  on  transionospheric 
radiowave  propagation,  it  must  be  converted  to  a  path  integrated  strength,  commonly  denoted  QL 
(C,L).  Calculating  QL  from  Ck  measured  at  the  DMSP  altitude  is  similar  in  concept,  although 
practically  more  difficult,  to  calculating  an  estimate  for  Total  Electron  Content  (TEC)  from  a 
single  density  measurement  made  at  the  same  altitude.  If  the  measurement  is  made  near  the  F2 
peak,  CkL  can  be  reasonably  estimated  by  multiplying  Ck  by  the  ionospheric  slab  thickness  (TEC 
divided  by  the  F2  peak  density).  At  higher  altitudes,  and  definitely  at  DMSP  altitudes,  the 
conversion  from  Ck  to  CkL  must  account  not  only  for  the  thickness  of  the  irregularity  layer,  but 
also  for  the  variation  of  Ck  with  height.  Neither  of  these  is  well  known,  so  the  APGA  program 
uses  a  very  simple  multiplicative  factor,  an  effective  thickness,  Lcff,  to  account  for  both  effects. 

This  factor  is  implemented  such  that  it  can  have  three  different  values  at  equatorial,  middle,  and 
high  latitudes  with  smooth  transitions  between  latitudinal  regimes.  Initial  values  for  Lcff  were 
calculated  for  each  regime  for  typical  nighttime  profiles  assuming  that: 

a.  the  topside  density  profile  followed  a  Chapman  distribution, 

b.  the  irregularity  layer  reached  from  the  F2  peak  to  (at  least)  the  satellite  altitude, 

c.  the  parameter  (RMS(AN))/N  is  constant  throughout  the  irregularity  layer. 

Values  for  were  1.4xl07,  4.5xl06,  and  3.5xl06  for  the  equatorial,  middle,  and  high  altitude 
regimes,  respectively.  This  conversion  from  Ck  to  CkL  is  definitely  the  weak  link  in  the  calculation 
of  CkL.  A  great  deal  of  further  work  is  required  to  provide  better  values  for  Lcfr. 

(NOTE:  The  preceding  description  of  the  characterization  of  ionospheric  irregularities  was,  of 
necessity,  brief.  A  full  description,  based  on  the  CkL  parameter  but  still  applicable,  can  be  found 
in  references  1.2.3s  and  1.2.3v,  and  in  other  references  found  in  the  CkL  section  of  the  SSIES 
Project  Workbook.) 

b.  Calculation  Procedure. 

(1)  Collect  ion  density  data  and  filter  PDS  data  from  the  SM  sensor  or  electron  density  data  from 
the  EP  sensor  (modes  C,  D,  and  DS  only)  until  22  seconds  of  data  have  been  collected. 

(2)  Check  the  512-point  data  set  centered  in  the  22  seconds  for  missing  data  points.  Fill  in  any 
single  or  double  missing  data  points  by  linear  interpolation  from  the  points  on  either  side  of 
the  missing  data.  If  more  than  two  sequential  missing  data  points  are  found  in  the  512-point 
set,  fall  back  to  the  256-point  set  centered  in  the  22  seconds.  If  more  than  two  sequential 
missing  data  points  are  found  in  this  set,  or  if  more  than  25  total  missing  data  points  were 
found  in  either  the  256  or  512  point  sets,  do  not  attempt  to  calculate  irregularity  parameters 
from  the  data  set.  Otherwise,  move  on  to  the  next  step  with  either  a  512  or  256  point  data  set 
for  further  processing. 


(3)  Calculate  the  density  trend  from  a  quadratic  least-squares  fit  to  the  density  data.  Subtract  the 
trend  from  the  data  to  provide  the  detrended  data  sample,  AN. 

(4)  Calculate  RMS(AN)  and  (RMS(AN))/N  from  the  center  ten  seconds  of  the  detrended  data  set 
(240  points). 

(5)  If  the  (RMS(AN))/N  is  below  the  user  selected  threshold  for  the  CkL  calculation,  quit 
processing  the  data  at  this  point. 

(6)  Apply  a  "split-bell"  cosine  taper  window  to  the  detrended  data  set.  The  severity  of  the  taper 
(in  percent  of  the  data  effected  by  the  window)  is  specified  by  the  user  in  the  range  0%  (no 
window)  to  100%. 

(7)  Calculate  the  PDS  of  the  data  set  from  a  Fast  Fourier  Transform  (FFT)  of  the  detrended, 
windowed  data  set.  This  will  cover  the  frequency  range  0.047  -  11.95  Hz. 

(8)  If  user  selected,  smooth  the  PDS  using  a  moving,  centered  smoother  with  binomial  weights. 

(9)  Calculate  a  decimated  PDS  by  resampling  the  full  PDS  at  constant  log-frequency  intervals 
(Alog  f  =  0.334). 

(10)  Add  the  PDS  estimates  from  the  SM  sensor  filter  comb  for  the  10-second  period  in  the  center 
of  the  data  set  to  the  FFT-produced  (full)  PDS,  and  the  average  value  for  each  filter  to  the 
decimated  PDS.  (Note:  The  log-frequency  steps  between  the  peaks  in  the  response  functions 
of  the  filters  in  the  filter  comb  are  identical  to  the  constant  log-frequency  step  used  in  re¬ 
sampling  the  full  FFT-produced  PDS). 

(11)  Calculate  Tj  and  Pi  from  a  log-linear  fit  to  either  the  full  or  decimated  PDS  (user  selected) 
over  a  frequency  range  specified  by  the  user.  If  the  T,  parameter  is  out  of  range,  do  not 
calculate  CkL.  If  the  p,  parameter  is  out  of  range,  either  use  a  model  value  for  p,  or  do  not 
calculate  CkL  as  specified  by  the  user. 

(12)  Calculate  the  effective  velocity  of  the  probe  in  the  irregularity  coordinate  system  using  the 
spacecraft  velocity  and  the  velocity  of  the  ions  with  respect  to  the  spacecraft  as  measured  by 
the  DM  and  RPA  sensors,  and  the  orientation  and  shape  (axial  ratios)  of  the  irregularities 
from  the  WBMOD  irregularity  model. 

(13)  Calculate  Ck  from  Equation  B-02. 

(14)  Convert  Ck  to  CkL  by  multiplying  Ck  by  a  model  value  for  the  effective  thickness,  Le(r. 


.6  Microprocessor  Sweep  Analyses  Processing. 

a.  Description. 

The  SSIES  instrument  package  is  controlled  by  a  microprocessor  which  is  located  in  the  SSIES 
main  electronics  package.  This  microprocessor  also  analyzes  the  EP  and  RPA  sweeps  to 
determine  electron  and  ion  densities  and  temperatures,  the  potential  of  the  EP  and  RPA  sensors, 
and  the  ion  ram  drift  velocity.  It  is  not  precisely  known  what  algorithms  are  used  for  these 
analyses,  but  they  should  be  comparable  to  those  documented  in  references  1.2.3b  and  1.2.3c.  The 
EP  sweep  analyses  are  run  in  the  first  second  following  completion  of  the  sweep,  and  the  RPA 
sweep  analyses  are  run  in  the  second  second  following  completion  of  the  sweep. 

b.  Output. 

The  results  reported  from  the  EP  sweep  analyses  are  the  electron  temperature  (data  frame  word  6, 
cycle  1  in  the  Common  Format),  electron  density  (word  6,  cycle  2),  the  EP  sensor  potential  (word 
13,  cycle  1),  and  a  set  of  9  sweep  processing  flags  (packed  in  word  11,  cycle  1).  The  results  for  an 
EP  sweep  analysis  are  first  reported  in  the  first  cycle  1  frame  after  the  end  of  the  sweep.  If  the  EP 
sensor  is  in  a  4  second  sweep  mode  (modes  A,  B,  BS,  C,  D,  or  DS)  or  in  a  calibration  sweep,  the 
analysis  results  will  appear  twice.  If  the  EP  sensor  is  in  mode  E,  the  analysis  results  will  only 
appear  once. 

The  results  reported  from  the  RPA  sweep  analyses  are  the  0+  ion  density  (word  5,  cycle  2  of  the 
Common  Format),  the  light  ion  density  (word  4,  cycle  2),  the  0+  ion  temperature  (word  5,  cycle 

1) ,  the  light  ion  temperature  (word  4,  cycle  1),  the  ion  ram  drift  velocity  (word  14),  the  RPA 
sensor  potential  (word  13,  cycle  2),  and  a  set  of  9  sweep  processing  flags  (packed  in  word  11,  cycle 

2) .  The  results  for  an  RPA  sweep  analysis  are  first  reported  in  the  first  cycle  2  frame  after  the 
end  of  a  sweep.  Each  analysis  result  will  appear  twice. 

Although  the  sweep  analyses  are  nominally  available  when  indicated,  they  may  be  one  data  frame 
late  if  the  analysis  takes  longer  than  the  allotted  time.  In  this  case,  the  analysis  from  the  previous 
sweep  will  continue  to  be  reported  until  a  new  sweep  result  is  available.  This  will  be  more  of  a 
problem  with  the  RPA  analyses  than  with  the  EP  analyses.  In  addition,  when  the  EP  sensor  is  in 
a  DC  mode,  the  last  EP  sweep  analysis  made  will  be  reported  throughout  the  time  when  the 
sensor  is  in  non-sweep  operation. 

c.  Data  Extraction  Algorithms. 

(1)  EP  Sweeps.  Extraction  of  the  EP  sweep  analyses  is  greatly  exacerbated  by  the  different  sweep 
periods  available  (4  seconds  for  normal  sweeps  in  modes  A,  B,  BS,  C,  D,  and  DS;  2  seconds 
for  normal  sweeps  in  mode  E;  3  seconds  for  calibration  sweeps  in  all  modes;  0  seconds  (no 
sweep)  for  most  of  modes  C,  D,  and  DS)  and  the  fact  that  the  different  sweep  times  are  mixed 
throughout  the  modes  (i.e.,  modes  A  and  B  can  have  4  and  3  second  sweeps;  modes  C  and  D 
can  have  4,  30,  and  0  second  sweeps;  mode  E  can  have  2  and  3  second  sweeps).  In  order  to 
efficiently  extract  the  sweep  information,  the  processor  must  keep  track  of  when  to  look  for  a 
sweep  analysis  and  how  long  the  sweep  analysis  will  be  available.  This  is  done  by  following 
the  value  of  the  sweep  clock  counter  and  watching  for  the  introduction  of  calibration  sweeps 
via  the  setting  of  bit  6  (counting  down  from  the  most  significant  bit  in  the  9-bit  word)  in  data 
frame  word  1,  cycle  1  of  the  Common  Format.  In  one  of  the  DC  modes  (modes  C,  D,  and 
DS),  an  additional  complication  arises  in  that  the  processor  must  know  not  to  extract  analyses 
when  no  sweeps  have  occurred  in  order  to  avoid  repeating  a  sweep  analysis.  This  is  done  via 
three  logical  variables,  SWPNOW  which  is  .TRUE,  if  the  EP  sensor  was  sweeping  during  the 


current  data  frame,  NOSWP  which  is  .TRUE,  when  there  is  no  sweep  analysis  to  be  extracted, 
and  BIAS  which  is  .TRUE,  when  the  current  EP  sweep  is  in  calibration  mode. 

(2)  RPA  Sweeps.  Since  the  RPA  sensor  sweeps  in  a  constant,  never  varying  4  seconds  per  sweep 

period,  the  extraction  is  much  simpler  than  for  the  EP  sweeps.  Collection  of  sweep  analysis  ^ 

data  begins  for  a  particular  sweep  in  the  first  cycle  2  data  frame  of  each  4  second  period  as 

specified  by  the  sweep  clock  cycle  counter.  The  value  of  the  potential  of  the  ion  sensor 

ground  plane  (Vbias)  must  be  saved  from  the  previous  4  second  period  to  convert  from  sensor 

potential  to  spacecraft  potential.  When  the  data  from  both  cycle  1  and  cycle  2  have  been  J 

collected,  the  processor  waits  until  the  first  cycle  1  frame  at  the  start  of  each  4  second  period 

when  it  indicates  that  an  analysis  has  been  received. 

d.  Data  Reduction  Algorithms. 

Other  than  converting  from  data  frame  words  to  engineering  data,  the  following  data  reduction 

algorithms  are  used: 

(1)  Ion  densities: 

N.  =  lo.O  008  N‘ ]  ion/cm 3 


where:  log  N;  is  the  log  density  value  reported  in  the  data  frame  word. 

(2)  Electron  density: 

Ne  =  3476  x  1Ql3  70.0  ^  ell  cm 3 

where:  Te  is  the  electron  temperature  (c  i  000°  K  if  the  temperature  analysis  was  not 

reported), 

log  Nc  is  the  log  density  parameter  reported  in  the  data  frame  word. 
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